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i. ABSTRACT 


This program consists of three sub-programs which exrecise 
the Bsif Asyncronous Multiplexer. is an off-line 
exerciser. PROGRAM 2 is an on-line exerciser which 
continuously transmits the last character received. GRAM 
3 is an achd test. 

NOTE: PROGRAM 1 will run any silo alarm level setting. 
(For PROGRAM 2 and 3 see Section 9.) 


2. REQUIREMENTS 
2.1 Equipment 
POP-11 standard computer with console teletype 
Up to 16 DJ11 asyncronous multiplexers. 
2.2 Storage j 
This program uses all cf BK, except absolute Loader. 
2.3 Preliminary Programs 
MAINDEC-11-DZDJA  # ODJ11 Logic Tests 
3. LOADING PROCEDURE 
Use standard procedure for ABS tapes. 
4, STARTING PROCEDURE 
4.4 Control] Switch Settings 
See S.1 (all down for worst case testing) 
".2 Starting Address 


The program should always be started at 200. It may be 
restarted at 1000 after all parameters have been selected. 


EO1 
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4.3 Program and Operator Action 


1) Load pregres into memory using ABS loader. 
) Load addrass 200. 
3) If hardware switch —— is available, set switches 
(see sec. 5.1), al] down for worst case, ‘he gtart. 
{ switch-less processor simply press start. 
nter the program number (1, 2, or 3). 
elect lines if SW<8> is on'a I. 
PR 1 will pane and bell will ring once every pass 
“EOP” is also printed on each pass. 


OPERATING PROCEDURE 

Operational Switch Settings 

At SA 200, a1] switches down is worst case apt » 
PROGRAM 1 only, the bell will ring and OOeop is printed u 
completion of a pass of the entire program. 


The switch settings are: 


SWwilS> = 1 ..... HALT ON ERROR 
Swild) = 1... INHIBIT PRINTOUT 
Si 1g» = : “airing PRINT SILO ALARM LEVEL (PROGI ONLY) 
~ 0 [I222 BELL ON PASS COMPLETE (PROGI ONLY) 
Suc) = 1 :.... INHIBIT MAI E (PROGI ON-LINE) 
Su<8) sete: SELECT LINES FOR TEST (SEE 5.3) 
SW2:00= 0 ..... BINARY COUNT PATTERN 
1 11.1. “THE QUICK SILVER GRAY FOX... ” 
ae ALPHANUMERIC (40-177) 


THIS PROGRAM HAS BEEN MODIFIED TO RUN ON A PROCESSOR WITH 
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For 
pon 


OR 


WITHOUT A HARDWARE SWITCH REGISTER. WHEN FIRST EXECUTED THE 
PROGRAM TESTS THE EXISTENCE OF A HARDWARE SWITCH REGISTER. 


IF NOT FOUND TWARE ae ey GISTER LOCATION (SWREG=L 
178) $s Daag TO. IF THIS IS THE CASE, UPON EXECUT 


S OF THE SWREG ARE DUMPED IN OCTAL ON THE CONSOLE 


TTY AND ANY CHANGES ARE REQUESTED 
(1.£.) SWR=XY¥XXXX NEW= 


Possible responses are: 
1. <Ch If no changes are to be made. 

e. 6 DIGITS 0-7 To represent in octal the new swi 
regis er value; last digit followed 
(CR. 


3. Tc allow reentering value if error 
committed keying if swreg value. 


teh 
by 


is 
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Built into the program is the ability to mpeemenst change 
the contents of sure i program execution. By striking 
tG (CNTL G) on console tty he operator sets a request flag 
to change the contents Of swreg, which is processed in key 
areas of the program code (ie) error routines, after halts 
end of pass, and other applicable areas. 


$.2 Subroutine Abstracts 

§.2.1 HLT 
This routine (called by an_EMT instruction) prints out an 
error message (see 6.1). To inhibit opegerts put SW<13) on 
al. To ring the bell on an error, pu SW<105 on a 1. 


5.2.2 ALMCK (PROG1 only) 


in the normal operation the “done” bit is set as each 
character is read into the fi/fo buffer(silo). but this 
done” condition can be delayed to cause done on the 5S, 9, 
or 17 character. this is done by cutting one of the jumpers 
(wl,w2,w3) on the a728S control Board. the program tests 
for this “silo alarm level” and if swl2 is set (1) it will 
print out the level (in octal) at which each “1s is will 
set “done”. the subroutine also adjusts the character 
counters to ensure that the mazimum number of characters to 
be transfered is a multiple of the silo alarm level. this 
ensures that all data will be read out of the silo. done 
will not set if the number of characters in the fi/fo buffer 
is less than the silo alarm level. (note character present 
is. set on each character in the buffer, regardless of the 
silo alarm level.) 


5.2.3 TRAPCATCHER 


A”.42" - “HALT” sequence is repeated from 0 - SE to detect 
any unexpected trogs and 3 ”.42" - “JOT” sequence is 
repeated from 60 - 776 to detect any unexpected interrupts. 
Thus any unexpected traps will HALT at the vector + 2. An 
gnesage tog interrupts will result in an error message an 
HALT” in “IOTRAP”. 


an 
tw 


Program and Operator Action 

Alter the device parameters are reported, the program ‘yes 
“PROGRAM s: “, at which time the o erator enters “a a 
or "2" depending on the sub-program he wishes to run. 


tf SWB) ss on al, the program will TYPE OUT ” N SELECT 
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ei 
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LINES =" THE OPERATOR wy BY {ye ” AN OCTAL NUMBER 
NG THE LINE(S) Ay H ARE TO Se em ao 2, Ml 
1 FOR re 0,8 A 7 FOR tines 6,1 
YOU WERE BInECT(Y ‘SETTING THe’ tcR iba 
11’s are “ the system the n will CA 
the prompt is reissued. when all lines 
program will run the selected subprogram. 


Error Printout 

The format is as {ollows: 
ADR (R1) (R2) (R3) (RY) 
Where: 


= Address of error HLT 
= Contents of general ———- "a". From none to 
four of these his be ures aiteending on the number 
teu (a, the HLT would type (R1) 
HLT iby fifede would stop after typing 
ADR and D 


To find _ hada test, look at the listing above the 
address i, most cases the comment beside the HLT 
tells ae ~ “being checked and what was expected. 


ADR 
(Rin) 


Error Recovery 
Restart at 200 cr 1000. 


Error Counter 


An error count 1s kept in “ERRORS” . IT CAN BE CLEARED FROM 
3 CONSOLE, BY STARTING AT 200, OR BY RELOADING THE 


RESTRICTIONS 


This program requires that the de 
teat atts. address convention (O31 
at then the DH11’s) and t 
all be contiguous. If the first 
(other than TE0010 ) then Loc. 

contain this nonstandard address. 


addresses follow the 
11] be first, starting 
the vector addresses 
address is nonstandard 
must be changed to 


If this program is run with a monitor, 1.¢. ACTI1 of DOP, 


SEG O0CE 


HO 1 
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Description 


6.2 


6.3 


only PROGRAM 1 18 run. 
MISCELLANEOUS 


Execution Time (PROG! only) 


Due to the verious baud rates available and the ability to 
check up to 16 DJ11’s at once, the exicution time can vary 
anywhere from 3 seconds to nearly an hour. The following 
typical times are for one DJ1I with all lines at the same 
preer 8 level code, 2 stop bits, and no pares on 8 

“11/720 . For ‘multiple DJ11’s, multiply these times by 
the number of units selected for test. 


Stack Pointer 
Stack 13 initally set to 1200 


Pass Count (PROG] only) 


A 32 bit (2 words) pass count is kept in “PONT” . IT CAN BE 
CLEARED FROM THE CONSOLE, BY STARTING AT 200, OR BY 
RELOADING THE PROGRAM. 


POWER FAIL 
EACH PROGRAM CAN BE POWER FAILED WITH NO ERRORS. TO USE 
START THE PROGRAM AS USUAL AND P°“ER DOWN THEN UP AT ANY 


TIME. THE ROUTINE SHOULD TYPE “PUWER” and restart the 
program with no other error typeouts. 


SEG 0007 
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g. PROGRAM DESCRIPTION 


101 


This program consists of three sub-programs which exercise 
the logic of up to 16 DJ11 asynchronous data multiplexers. 


PROGRAM 1: EXERCISER (off-line) 
This program exercises up to 256 lines (16 ODJ11’s) 
simultanedusly in maintenance mode. Three different data 
patterns may Be selected from the switch register. The data 
attern is repeated a minimum of 16 times for each pass. 
he program should be run for at least 2 passes with all 
switches down. SW<9> on a one disables the maintenance 
mode, requiring turn-around cards at the termination of each 
line being tested. (Note: The reciever and transmit lines 
must be jumpered for the same speed.) 


PROGRAM 2: CONTINUOUS ECHO EXERCISER (on-line) 

This prograa bessiansanag transmits the last character it 
received on the respective line. A null (000) will “echo” 
72 times and then turn off the transmitter. 


* PROGRAM 3: ECHO TEST (on-line) 


This progres transmits a heading (#ECHO TEST#) on each line 
and then echos everything that it receives. 

Caution: If characters are received faster than they can be 
transmitted, the software buffers may overflow. 


Note: The on-line exercisers (PROG2 and PROG3) are operator 
Sepeedont, and therefore do not loop. I.E. No passes. 
ACTIl and’DOP monitors will only run PROGI. 


If the silo alarm level is set for anything other than 1 
char. (all 3 jumpers wired in). You must press the key on 
the terminal, under test, that many times before an echo 
occures. JE: if the silo alarm level is set for S you must 
press the key S times before an echo back. 


SEG 0008 
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SWITCH SETTINGS 


- ENABLE 


o 


-E 
;PROGRAM BY KEN CHAPMAN 
;MODIFIED BY DAVID L. ADAMS MAY 1977 


; SWITCH USE 
Gwis= 1 sHALT ON ERROR 
Swiss 40000” 
SW13= 20000 : INHIBIT ERROR TYPEOUTS 
Sul2= 10000 5 PRINT T SIL LO ALARM LEVEL 
SWil= 4000 : NO 
SWi0= 2000 *0 = BELL ON PASS COMPLETE 
:1 - BELL ON ERROR 

SW9= 1000 ;ON-LINE (PROG1 ) 

= 400 ‘SELECT LINES (INITIALIZATION TIME ONLY) 
; a0: :2) SELECT MESSAGE (PROG1 ONLY) 


OJ11 REGISTER BIT ASSIGNMENTS: 
CONTROL STATUS REGISTER (CSR) XXXXx0 

BITO RECE NABLE (READ/WR 
BIT1 HALF DUPLEX SELECT TREAD /ARITED 


aga 
2 


ONLY 

MASTER TRANSMITTER SCAN ENABLE (READ/WRITE) 
° ett BREAK REGISTER (READ/WRITE) 
2 STATUS ENABLE ir eee 
3 FI/FO OVERRUN (READ ONLY) 
4 MASTER TRANSMITTER INTERUPT peas (READ/WRITE) 
S TRANSMITTER READY (READ ONLY) 
RECEIVER BUFFER REGISTER (RBUF) XXXXX2 (READ ONLY) 


IT0-7 RECEIVED CHARACTER 

8-11 LINE NUMBER 

12 PARITY ERROR 

13 FRAMING ERROR 

14 UART OVERRUN ERROR 

15 CHARACTER PRESENT 

TRANSMITTER CONTROL REGISTER (TCR) XXXXX4 (READ/WRITE) 
BITO-15 STOP THE SCANNER ON CORRESPONDING LINE 


TRANSMITTER BUFFER (TBUF) XXXXXé 


DWOWWOWWOWOWOOVWWOMOwWw 
Ce LeeLee ee ee eee Ce ee eee eon) 
444444 4 SH 4 
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RRR 
00 NOUN 


B 


Rae ee ae ee ee 
TOTO be 0 0b 0 0 <b 0 0 2 & <b bo 9 bs 8 bs 92 § = 9 be be 0 0 
PN ee ee ee ee eee ee ee ee ee ee ee ee ee ee eee ee ee ae ee ee eee) 


rr 
oo 
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DJ11 SPECIFICATIONS SEG 0011 


BITO-7 TRANSMITTED CHARACTER waaine ONLY } 
BIT8-11 LINE NUMBER (READ ONLY) 


BREAK CONTROL STATUS REGISTER (BCSR) XXXXX4 (BIT1O OF CSR SET) ‘READ/WRITE) 
BITO-15 TRNSMIT A BREAK ON CORRESPONDING LINE! 


SCOPE= TRAP 
HLT= EMT 
TYPE= IOT 
PS= 177776 
RO= 70 
Rl= “1 
Re= wre 
R3= %3 
R4= “4 

= 45 
TTY= “4S 

= %6 
PC= 47 
BELL= 7 
BITO= 1 
BITI= 2 
BITe= 4 
BIT3= 10 
BIT4= 20 
BITS= 40 
BITé= 100 
BIT7= 200 
git = 400 

T9= 1000 
BIT10= 2000 
BIT11= 4000 
BITle= 10000 
BIT13= 20000 
BIT14= 40000 
BIT1S= 100000 
LEVEL? = 340 
OPEN 


= 0 
STACK = 1200 
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DJ11 SPECIFICATIONS 


SHE BEGIN 
1000 


JMP RESTAR 


sori, 
4 THRU S6 CONTAIN “.+2” AND ™ 
60 THRU 776 CONTAIN “.+2” AND “IOT” IN EVERY VECTOR 


; TRAP CATCHER IN LOCATIONS O THRU 776 
9 AND 6 CONTAIN “HALT” INSTRUCTIONS 
et RY VECTOR 


;200 ALWAYS IS THE STARTING ADDRESS 
;RESTART ADDRESS 


s ITERATION COUNT-LH, TEST NO.-RH 
: C REGISTER 
PASS COUNT REGISTER 


;MINIMUM NUMBER OF MESSAGES (PROG1) 
;MAP OF LINES SELECTED, OJ11 #0 
;MAP OF LINES SELECTED, DJ11 #1 
;MAP OF LINES SELECTED, DJ11 se 
;MAP OF LINES SELECTED, OJ11 #3 
;MAP OF LINES CTED, DJ11 #4 
;MAP OF LINES SELECTED, DJ11 #5 
;MAP OF LINES Set ecTED OJi1 #6 
;MAP OF LINES CTED, DJ11 87 
;MAP OF LINES SELECTED, OJ11 #10 
;MAP OF Lite? CTED, OJ11 #11 
;MAP OF LINES CTED, OJ11 #le 
;MAP OF LINES SELECTED, OJ11 #13 
;MAP OF LINES SELECTED, DJ11 #14 
;MAP OF LINES SELECTED, DJ11 815 
;MAP OF LINES SELECTED, DJ11 #16 
;MAP OF LINES SELECTED, DJ11 #17 
;RECEIVE BUFFER SIZE (PROG3) 
;LAST ADDR OF ER 
;NUMBER OF TT ee THE SYSTEM 
sFIRST DEVICE Ss 

;FIRST VECTOR ADDRESS 

;RECEIVER BR Level = 5 

; ITTER BR LEVEL = 5S 


Ww 
| om aml 
a528 
o2zm 
[on 


ALARM LEVEL FLAG 
COUNTERS 


SEG O0le 
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000400 
003313 


000400 
004313 


DJ11 SPECIFICATIONS 
_— . ; VALUE OF THE SILO ALARM LEVEL 


5 362 33396363 2 3 3 9 3 J a a a a 
HGHEHHHHEHBHHBEHGHEHHEHEHHIHEHHHHEHIHIHI HHH IIH iii 
XMTTAB: .BLKW 400 ; TRANSMIT DATA POINTER TABLE 


RCVTAB: .BLKW 400 ;RECEIVE DATA POINTER TABLE (PROG1) 
;RECEIVE DATA TABLE (PROG2 AND PROG3) 


XMTCNT: .BLKW 400 ; TRANSMIT DATA COUNTER 
RCVCNT=XMTCNT+1 ;RECEIVE DATA COUNTER 
400 TER MASK TABLE 


MASK: .BLKW ; CHARAC 
CNTTAB=MASK+1 ; ITERATION COUNT AND FLAGS 


SEG 0013 
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SSTACK, SP ;SET UP STACK POINTER 


8 <, +3 ;10T VECTOR (20) 


RD), ;POWER FAIL VECTOR (24) 
; RO}+ ENT VECTOR (30), 
RRORS sC RROR COUNTER 
BRR ‘CLEAR ERee COUNTER 

;START OF FLOATING VECTOR AREA 

4 : UPDA K 

RO -2(RO) ARO” “42” IN EACH VECTOR 
arOT, (RO)+ 
ia » RO cx m BA FLOATING VECTOR AREA 


BEGIN: 


ww THE ALARM FLAG 
Ps Tenn SIZE VALUES 


‘ 1T+4 
870. .CNTNIT#+10 
1, TIMES ;SET FOR QV ON FIRST PASS 


MEARE AE IEE Abb kb ab a a a nb a a a a a a a a a a a ab a a aa a aah a 


ROUTINE TO MAP ALL THE DJ11’S ON THE SYSTEM 
HHMHHHHHHHHHHHHHEHHEHEHHHHHEHHHHIHE HEHEHE Heeb t 


001270 DIMAP: MOV DEVAOR, RO RST FLOATING ADDRESS 
MOV Re i CoUNTER Ff Ji's 
ant, ae at get 





of 
See e ee eeeeoous 


q 
: 
8 
ote 


ns 
is 


{fo heck FOR A DEVICE 


60 TO NEXT DEVICE ADDRESS 
; COUNT DJ11°S 
"LOOK FOR MORE 
7S: ae ; MEOUT VECTOR 
BB abe are sounrts ESTO TH 
001005 GETVEC 
015567 MSGOI sTYPE "NO DJ11°S!” 
*FATAL ERROR 
900137 013522 aeD0NE : RESTART 


hi babbahehatabatntahababatahahehabghniahetatie}-b-talnb-tb-b-b-b-b-btab-tntab-te nlite alalalalalalalalalaialelalaisiaiaislalaiaie 


ROUTINE TO VECTOR ADDRESSES OF DJ11 
See icecsusccccsevecescasrscassasecuseasarecensessenanesseecenasse 


GETVEC: MOV -(SP) IOT VECTOR 
etds ooo020 Hov ore e20 RESET LOT avectoR 
o40400 MOV Sito, ff RL) eee 

‘Bt Tes TRANS SCAN ENABLE 


Sy 


By 
= 
8 
Tu 
3 


= 


C02 


SEG OC1S 


» 
: g oO 8, cu “nw ow 
-™ SY GG * te 2 © 
eo a 3 => Fa cu a, tier r 3 4 Hy 
et eee ae eee 
. = Sr See BB 2S 6 ch 82 86 5S 
¢ 5 ke Sebee Gos ows & S. zh 24 2S 
a as Ee es 
. Boe Spee S05 SRSNABE ye 82 Be 58 e re 
g SSE Care BS baba e* xe na 
- : g 
> - -a— ~ “Aa 
* S ghth Bo 8 cytes hte Ein mun 
. -— ~~ 4 ~~ « 8 ne} & eis ie 

-. kee Ate w Roh roth. 6 ee ase s say 
S gm Soeh STs 8 Secobssets x : Save Pa pegs. 
“4 oO 

s art are 
3 Ban BRBRE BEE = Sssueesseag, 8 nett tanteatan 
8 4 48 : 


173312 REPOR 


Tt a. 
cia oe 
Tit 
EF, RERRRAREGRSRERRESRERERNMREERURERNNRRER RARE 
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CHARACTER LENGTH NAPPING ROUT INE 


¢ RELREREEEE SESE SESE ELLE EE ESSER EEE PRES RAS E EEL E RARER REESE ESSE ESSE E ES 


MAP 
Sea aE EAE 0b ab SE a a a a a aS ab a a aa aaa a a a a aaa aaa 


;ROUTINME TO 
GETLEN: ae 
6S: MOV 
MOV 
1S: MOV 
MOV 
10$ BIT 
es: 
3s: 


4§: 
Ss: 


pio seeakoet hicimtes ara eh Lae 


ow 

- 

7 
xz 
i 


MPao— — ruta 


& 


pe 


2 
2 RRR BW 


RBLPEPM PARRA? 
? 
8 


Des 
_ 
oo 
x 

— 


sz 
MOL 


a 
zawDzw 
muwy 
~~ 
+++ 


;SET UP UNIT COUNTER 

-SET UP DEVICE ADDRESS POINTER 

3;SET UP LINE 

“RCV ENB, CMOS, MAINT., TRANS SCAN ENB 
‘WAIT FOR MOS TO CLEAR 

; TRANS CONTROL, ONE LINE AT A TIME 
‘WAIT FOR TRANS READY 

;SEND A RUBOUT 

:SKIP 4 LINES 


: UPDATE POINTER TO NEXT UNIT 
CHECK FOR MORE UNITS 


;SET UP CHAR LEN TABLE POINTER 
'ZET UP CHAR COUNTER 
SAVE AND CHECK CHAR PRESENT 


fat 3 POINTER TO CHAR TABLE 
; DATA _INTO MASK 


;CLEAR UPPER BYTE 
;SAVE THE MASK 
;SAVE THE MASK 
;SAVE THE MASK 


;ADDRESS POINTER TO NEXT DJ 
scum LENT TABLE POINTER 


; BRANCH BACK IF MORE 


SEG OO1E 
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a aet toe Gacanes th ot chee eae 
; SELEC 
’ 


PROGRAM TO 
tPROGRAN 2: ONeL The The EXERCISER (TRONSHIT LAST CHARACTER RECEIVED) 


Beer rerrEr errr irerrtrererertttrrrrtr ett tT TTT ttt ttt ttt tT tt rtt Ter tey 


2833 
2834 

see 

2636 

Es 006162 005737 oo0c4e2 SELPRO: TST ase ;CHECK FOR ACT 11 OR DOP 
2842 006166 001040 BNE ALL “BRANCH IF MONITOR 

2843 006170 900004 015550 TYPE, MSGPRG 

2844 006174 014002 JSR RE READIN ;READ A NUMBER FROM THE CTY 
2845 006200 006332 .WORD  PROGNO 

eae 006202 001367 BNE SELPRO 

2847 006204 000400 172776 BIT #6178, @SWR =; CHECK FOR Su<B>, SELECT LINES 
2848 O06el2 001426 BEQ ALL F 

2949 006214 905000 CLR RO SET UP UNIT COUNTER, DISPLAY 
2950 16 012701 001220 MOV 8SVSWO,R1 :SET UP SWITCH TABLE POINTER 
2851 O06222 000004 015371 SWITCH: TYPE, RETURN 

coos press Were sesaie noe : RO TTY PRINT THE NUMBER OF THE DRIIC 
2854 006234 Sone 014356 JSR PC’ PRINTS 4 

2855 0062040 000004 015351 TYPE,  MSGSEL sASL FOR THE SELECTED LINES 
2856 00624 004537 014002 JSR RS, READIN 

2857 006250 001214 .WORD  SAVIT 

eese 006252 013721 001214 MOV SAVIT, (R1)+ 

2859 006256 00S5200- INC RO ;COUNT UNIT 

2860 006260 020037 o012b6 CMP RO UNITS  :CHECK FOR MORE UNITS 

2861 O06264 001356 BNE SWITCH ‘BRANCH IF 

e8be 006265 000410 ae RESTAR GO DO IT 

2864 006270 013700 001266 ALL: MOV UNITS, RO SET UP UNIT ¢ TER 

2865 006274 012701 OO0leco V eSvSWO, RI :SET UP SWITCH TABLE POINTER 
2866 006300 O1e721 177777 18 MOV 8177777, (Ri)+  :SET ALL LINES 

2867 006304 005300 DEC RO ‘COUNT UNITS 

2868 006306 001374 BNE 1$ ‘BRANCH IF MORE 

Fac} -SBTTL RESTART POINT 

oo 10 013700 006332 RESTAR: MOV PROGNO, RO 

2872 pests 001722 BEQ SELPRO 

2873 006316 022700 000002 CMP 83 RO 

2874 006322 103717 BLO SELPRO 

2875 006324 006300 ASL RO 

ee76 006326 000170 006322 IMP BPROGAD (RO) 

2878 006332 PROGNO: 

2879 006232 000001 PROGAD: 1 ;DEFAULT TO PROGRAM 1 

cee Sess ieee Proce 

cee2 806240 Oleice PROG 
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OZDJBE .P 08-SEP-77 15:07 PROG1: OFF-LINE EXERCISER SEG O018 


; AeASNaeeanaeaeaenenaeneeasanaeeceaeeceaeseeeaeaseneseesesteseatatans 
a ey ALL LINES SIMULTANEOUSLY 
eee Orbe: (> = 
< 2 PY 
an THE A ABLE SELECT ED BY SW<2:0) 
NE REPEATS 7S THe PATTERN AT LEAST 16 TIMES 
: TrTIriittittiriitiiiiiitiritittitiiiiiiitiititiitiiiiirierterr cir ger ss! 


EE 


2 PROG1: RESET : THE WORLD 
reat eas 001200 MOV eSTACK, SP ifeere Se STACK POINTER 
sees ere, gore 7% ay Benne, «Fyre Ta bine 
6 ’ 
Boeses Aisne Bbtads HOY BLMOO RE FER a tw OF faces. {HORDS) 
006365 I 1S: CLR (R1)+ ‘CLEAR THE TABLE 
006370 005302 DEC Re 
Spears 8rs303 00400 BM = «400, R2 |LENGTH OF MASK/COUNT TABLE 
006400 005201 2s: INC R1 :SKIP MASK 
006402 105021 CLR tRL)+ ‘CLEAR COUNT 
se Bok nn mS 
2911 sROUTINE TO INITIALIZE ALL DJ11’S AND THEIR ISR’S: 
2912 “SET UP ALL INTERRUPT VECTORS 
2913 ‘SET UP DEVICE ADDRESSES IN LINKER ROUTINES 
2914 :SET CSR'S EVERYTHING ENABLED 
e215 -SET TCR’S, ALL LINES ENABLED 
e317 006410 o0s000 PLINIT: CLR RO 
18 OO06412 013701 MOV DEVAOR, Ri 
2919 OO6416 013702 0010272 MOV VECADR, Re 
2920 OOEYee 018703 MOV SRISRO, R3 
2321 10322 118 MOV R3 (R2)+  ;SET UP RECEIVER INTERUPT VECTOR 
2322 006430 013722 001274 MOV RCVLVL, (Ro)+ 
o3e3 O06 34 CMP (R3)+,' (R3)+  ;ADD 4 TO 
0064 10113 MOV Rl, (R3) “ADDRESS OF CSR 
2925 006440 062723 000002 ADD #2 (R3)+ ; SS OF RBUF 
2326 006444 005723 TST (R3)+ 
2927 Soe e 010322 MOV R3 (R2)+  ;SET UP TRANSMITTER INTERUPT VECTOR 
2526 13722 001276 MOV XMTLVL, (Re)+ 
23es ele CMP (R3)+, (R3)+ 
2930 10123 MOV RI (R3)+  ;ADDRESS OF CSR 
2931 OO6460 005011 CLR (RI) :CLEAR CSR 
2932 006462 052711 OSOSID BIS #50510, (RL) :SET UP CSR 
2923 ‘BIT = CLEAR MOS 
2934 ‘BIT6 = RECEIVER INTERUPT ENABLE 
Sou ;BITS = T ITTER SCAN 
*BIT12 = STATUS ENABLE 
2937 ‘BITI4 = TRANSMITTER INTERUPT ENABLE 
e338 Doe YEE 932711 000020 138: BIT eBIT4, (RL) : CHECK FOR MOS TO CLEAR 
2940 Se ee 005732 001300 TST ALMFLG sHAS THE SILO ALARM LEVEL BEEN CHECKED? 
2941 06500 901 BNE 10$ : 
e942 006602 0047327 007006 JSR PC ALMCK °NO,GO DO IT 


GOe 
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DZDJBE.P11 08-SEP-77 15:07 PROG1: OFF-LINE EXERCISER SEG 0019 
2943 006506 10$: ASL RO UNIT # # 2 

2344 006510 016061 001220 O00004 MOV SVSWO(RO),4(R1) ; SE] TCR BITS (CSR + 4) 

Saye Bocas aa ttC Mer oer 

1 1 001260 V 41 MARK 

2067 006526 01 172456 MOV aSuR, RS st SWITCH SETTINGS 

2948 00653¢ 177770 IC 8177770, RS *MASK MESSAGE 8 

5466 NES 40 aS 

2951 O06S42 012304 MOV (R3)+, RY :SET UP OFFSET TO TABLES 

es boee4 633761 001260 000004 14S: BIT HERK, 4(R1) CHECK FOR LINE SELECTED IN TCR 
2954 006554 016564 010206 001312 MOV ADRNIT(S), XMTTAB(4) 

2955 006562 016564 010206 O0e3l1e MOV ADRNIT(5) | RCVTAB(4) 

gee 006870 ll 1021 003316 nove CNTNET (CS), XMTCNT (4) 

116564 01021 13 CNTNIT(5) |RCVCNT (4) 

2958 006604 005724 wien 15S: ey (R4)+ ; INC OFFSET TO NEXT LINE 

2960 pees 03354 BCC 14S 

291 006614 001000 172366 BIT 8B81T9, @SWR  ;CHECK FOR ON-LINE 

2%e 1024 BNE 21$ ‘BRANCH IF ON-LINE 

2963 11 000014 BIS 814 (R1) ‘SET THE MAINTENANCE BIT AND CLR MOS 
See eit 000029 208 BIT a1T4, (RI) ‘WAIT FOR MOS TO CLEAR 

29% 006636 052711 000001 BIS #1, (RL) TURN ON RCV ENABLE 

Fa O0ebHe 062701 000010 12S: AOD #10,R ‘POINT TO THE NEXT CSR 

29639 006650 920037 001266 cre RO, UNITS 

S37 ; Speeee 012737 000001 001300 MOV #1, ALMFLG ;SET THE ALARM LEVEL FLAG 

e376 006664 042737 000140 177776 BIC #140, dePS LOWER PROCESSOR PRIORITY 

006672 O00406 BR FORGAD :G0 DO IT 

2975 006674 052711 o00001 21$ BIS #1, (RL) ; TURN ON RCV_EN 

2976 006700 005761 o00002 TST 2(R1) ‘CLEAR JUNK OUT OF THE RBUF 

2977 006704 100775 BMI 225 

2978 006706 000755 BR 12$ 

2983 he gee tet tate ga ee tg pee tet + + tt e+ laren alecemanetalaeatanainn email 
2924 0G PROGRAM TO MONITOR TABLE 

25ee RET Per ererertererertTrrerrerrirertrrtitrrertttr tert ttt rt tert ret t ee 
29ee : NOTE - PROGRAM MAY IN A LOOP 

2987 : IF THIS HAPPENS, SUN DZDJA. 

ooes 006710 012701 003312 FORGND: MOV 8XMTCNT,R1 

2990 006714 012702 0004 #400, Re 

2991 006720 105711 21S: TSTB) ss (RL) ;CHECK FOR COUNT TABLE CLR 

2992 006722 001376 BNE 2 ‘BRANCH IF NOT 

2993 062701 900002 #2,R1 :GO TO NEXT LINE ENTRY 

2994 006 005302 DEC :COUNT LI 

2995 006732 001372 BNE 21$ BRANCH” IF MORE LINES 

299% 006734 01270! 0022313 MOV SRCVCNT,R1 

2997 006740 Ole702 0004 MOV 8400, 

2998 006744 121137 001306 228: CMPB =s-s (R21) | COUNT :1S # OF CHAR LEFT IN RBUF LESS THAN 
2996 ‘THE SILO ALARM LEVE 

3000 006750 003375 F BGT 225 -IF NO WAIT FOR THEM 

200) 062701 o0000e ADC #2,R1 -IF YES IGNORE THEM 


HOe 
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DZDJBE.P11  O8-SEP-77 15:07 BACKGROUND MONITOR 
3002 005302 DEC Re ;COUNT LINES 
3003 Boe7e5 137 BNE 225 “BRANCH IF MORE LINES 
3004 001216 DEC TIMES 00 TH : AGAIN? 
3008 7b 001 BEQ 23$ NO, GET OUT 
137 006342 JMP PROG 

3007 006774 O01 001216 23%: MOV #20. TIMES ;D0 IT 16 TIMES THE NEXT TIME 
3008 po7one JMP aeDOnE IP ISR’S 
3003 é e761 1 OO0004 ALMCK: MOV OL aCRL) Sr hers a 
3011 ey pest it cevetl Ble eee TROY CR OE TEA MAINTENANCE BIT 
we 007024 005037 00130 CLR COUNT 
Ste a: i re obi se 001304 2s bv ire TIMERB SET UP TIME CONSTANTS 
Sie SOME pees TST (Ri)’ WAIT FOR TRANSFER READY BIT 
3017 O070S0 100373 BPL 
3018 007052 112761 77 000006 MOVB 8377, 6(R1) ned A CHAR TO TBUF 
3019 007060 001306 INC :COUNT EACH 
3020 007064 105711 1S: TSTB Ss (R21) :CHECK FOR DONE IN THE CSR 
3021 007066 100405 BMI ‘IF SET GET OUT OF THE LOOP 
3022 007070 004537 007320 JSR RS, TIME ‘GIVE DONE TIME TO SET 
Be fre word . 2 EIU 19 gute een Ge 
3025 007100 rae BR ALMCK ‘Bano RETURN AGAIN 
3026 007102 042711 000001 3S: BIC #8170, (R1) TURN OFF RCV 
3027 007106 052711 000010 BIS #8173; (R1) *C MOS 
308 007112 oer 3? 000001 001306 Cre #1, COUNT IF SILO LEVEL SET FOR 1 THEN GET OUT 
3030 007122 03737 001306 001310 SS: ADD COUNT , SUM GET THE LARGEST MULTIPLE OF THE 
3031 007130 001310 000106 CMP SUM, #70. *SILO ALARM LEVEL AND USE IT IN THE 
De 007136 02771 BLT c$ ‘THREE SIZE LOCATIONS 
3034 gts 5 001 001310 aT BSUNT SUM iT BREA ch’ SUBTRACT ONE COUNT OFF 
3035 iat posts? oer 010214 6S: MOV SUM,CNTNIT#4 § AS CLOSE TO 70 AS POSSIBLE 
303% 007156 013737 001310 010220 MOV Sum’ CNTNIT+10 
3037 007 164 063737 001306 001310 7s ADD COUNT, SUM ;CONTINUE TO A COUNT OF 256 
3038 007172 023727 001310 000377 CMP SUM, 8377 
3039 007200 002771 BLT 7§ 
3040 007202 163737 001306 001310 SUB COUNT, SUM 
Eat 007210 O13737 001310 010210 10s: HOV SUN, CATNIT ;AS CLOSE 19 286 AS POSSIBLE 
3043 007220 012737 000377 010210 4s MOV 8377, CNTNIT PUT SIZE TO MAX VALUE 
2044 007226 bie737 000106 010214 MOV 870.) CNTNIT+4 
3045 007234 012737 000106 010220 MOV #70. ‘CNTNIT+10 
3046 007242 042711 000004 118 BIC #81T2, (R1) ; TURN OFF THE MAINT BIT 
3047 007246 032711 000020 128 BIT #B1T4' (R1) “WAIT FOR MOS TO CLEAR 
3048 007252 001375 BNE 128 
sea parseo faeee> BIBECS 71720 Bit aS 2 aoUR {PRINT LAR LEV pene 
3051 007266 001413 BEQ 13s ;NO 
2052 000004 015676 TYPE, MALARM 

010105 MOV R1, TTY :YES, PRINT CSR FIRST - 
3054 004 014346 SR PC’ PRINTR 
2055 007302 000004 01S5&72 YPE, S 
3056 007306 913705 001306 MOV COUNT, TTY “PRINT ALARM LEVEL 


907312 004727 O1434¢ JSR PC, PRINTR 


' 
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OZDJBE.P11 08-SEP-77 


007316 000207 


PURSEESRRLA daca 


ze 


eau 


Guus 


SOR ERR EN ER CR RR RFR ER REFEREE AEE AAA AES AAO OOOO 


2 +0 20 + 0-20 -6-+ 0+ b— O-+ + & -2 8 -= & + b= & = &— b-+ B= & 0 6 — B-+ 6 Bb 0 B Pb = Bb Pb bb = = fb 
et ee ee ee ee ee ee ee ee tt et ee ee et ee tt et ee et ee ee ee a ee ees ees es 


g 

N“N 

o 

e- - _— 
ro 
OPOFO 
—-O- 
ie 
orn 


DJ11 EXERCISER AND ON-LINE T 
15:07 K 


Pertiiriti tri ttiisitittitiitiitiitttiiiitiictiiitgiiric ii step e ooo s ee 


13S: 
001302 TIME: 
001304 
001306 o00022 
2s: 
1S: 
010070 RISRO: 
000000 
007754 XISRO: 
Rais. 
007754 XISR1: 
810070 RISR2: 
000100 
XISRe: 
100 
10070 RISR3: 
140 
4 XISR3: 
000140 
010070 RISRY: 
000200 
007754 XISR4: 
000200 
010070 RISRS: 
000240 
007754 XISRS: 
000240 
010070 RISRE: 
000300 
007754 XISR6: 
000300 
a RISR7: 
007754 XISR7: 
000340 4 
ta RISR1O: 
007754 XISR1O: 
000400 


ESTS 
BACKGROUND MONITOR 
RTS PC 
woe 
DEC TIMERB 
BNE 1$ 
CMP COUNT, #22 
BNE es 
HLT+1 
TST (RS)+ 
TST (RS)+ ;SET RS 
RTS RS sRET 


JSR 


Tre001 2 CO#1O>> , <HOKO> 
< 10+<0#10>>, <40#0> 
(1600124< 1#10>>, <40#1> 
(1#10>>, <40#1> 
<2%10)>, <40#2> 
(2%10)>, <40#2) 
3#10>>, <40#3> 
(3%10)>, «40#3> 
4#10>>, <40#4> 
4%#10>>, <40#4> 
<S#10>>, <40#5> 
S#10>>, <40#5> 
6#10>>, <40#6> 
6#10>>, <40#6> 
7#10>>, <40#7> 
7#10>>, <40#7> 
4¢10#10>>,<«40#10> 
+<10#10)>, <40#10> 


-8-8-3a-8 
BBa85 838% 
Sargee tars 


—Te- 
pe 


Babsbets 
z 


Bsbsbs5 


“a 
-_ 

re MU 
SrBrzS 


—MUO 
+ 


BxBae% 
2 


—8-8-38-38-38- 
<4 


SO 


3 
b+ 4b et b= de 


= 
B2BrBLBrBrB 


8 


B3285 
OFM O- MOU 


b 


~ 
_ 
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: INCREMENT T WORD 
ACT OT FOR DONE AGAIN 
‘MAKE TIMERB LARGER IF FAST PROCESSOR 
; HAVE QuTPUTT 18 TIMES 
“NO, GO ANOTHER CHAR 
; YES, DONE DID NOT SET AFTER 18 OUTPUTS 
:SET RS FOR ERROR 

OUTPUT RETURN 
URN FROM ABOVE OR RETEST DONE 
; SELLS LALL SLE LLSLA ELE SL ELLA RLS LL SLE LREL SLE L LEELA SEALS SLE ERE ESSA SELES ES 
"PROG1 LINKERS TO DJ11 INTERRUPT SERVICE ROUTINES 


z 
g 


o 
R 


LR LOE ON LO LON LN LO LON LN LRN LOR LON LOD LOL LOR LON LR LN RL LOO LN OOO OO 3 


0 b= 0 b= b= b= 2 b= bs B2 § 2 b= 2 B—2 b= bo Bo Bb 2 Fo BB = 2 Fo Bs 2 
ee ee et et et et et et et eet eet eet eet eet eet eet et eet et eet eet eet ee et eet ee ee 


COREE 


ere 


OCU UCUWI WI WII WII WIWIW WW 
0 0 Ob Bs 0 Os 
SBYRR2BREB 


o-- 0+ 0-00 
incWwnr-O 
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Pl 08-SEP-77 15:07 ISR LINK RS SEG O022 
007574 904037 010070 RISRI1: JSR RO. RCVISR 
007600 1 pogo . WORD 1600168 11810) >, (4011) 
007604 XISR11: JSR XM 
19 160120 OO044O wae fro «1600104 11#10)> , «40#11) 
x ba teal eu XISRI2: JSR CTeGbL28¢ 128100 >, «40812» 
i | g 
Ore Sa eae . WORD RO eNO Ose 12#10> >, <HOK12> 
007634 004037 010070 RISR13: JSR RORCVISR a» ‘ial 
raat Maite precy XISR13: i ' Ro oat ier , 
007650 160140 O00S4O -WORD ¢160010+<13%10>>, <40#13> 
007654 004037 010070 RISRI4: JSR RO, RCVISR 
Borees Apaase payee RO RN es 0sto> , cudnt 
XISR14: JSR SR 
007670 160150 000600 SWORD (1 600104<14#10>>, <40#14 
00767 004037 910070 RISRIS: JSR RO, RCVISR 
160162 40 “WORD ¢1600124+<15#10>>, <40#15> 
907704 004037 007754 XISRIS: JSR RO, XMTISR 
007710 160i 40 . WORD 7 194¢15#10> >, (4O%15) 
007714 0070 RISRI6: ISR SR 
1601 5 (1600124< 16%10>> , <40#16> 
007724 004037 007754 XISR16: JSR RO, XMTISR 
007730 601 900700 : (1600104< 16#10>>, <40#16> 
10070 RISRI7: JSR RO, RCVISR 
007740 160202 000740 y (1600124<17#10>>, <40#17> 
007744 004037 007754 XISRI7: JSR RO, XMTISR 
007750 160200 009740 -WORD  <1600104+« 17#10>>, <40#17> 
. SESSEKSSEAERARELSARARERSARSRERAERAEELASRRAAELARRARERERASLRLALAARLELAAAL SS 
: TRANSMITTER INTERRUPT SERVICE ROUTINE 
. KELKALSSLASAALAAARRLE REEL SRESERELRELELSRARELERALAARE LAA RELASLARAERALRAEAL EAE 
007754 XMTISR: 
007754 010146 MOV R1,-(6) PUSH R1 ON STACK 
007756 010246 MOV Re’ -(6) “PUSH Re ON STACK 
007760 012001 MOV (RO)+,R1 
007762 005711 1S: TST (R1) CHECK FOR TRANS READY 
eae te te 000007 SOB Fee) R2 GET LINE NO 
007772 006302 ASL Re 
007774 061002 ADD (RO), R2 
07776 105762 003312 TSTB XNTCAT (2) ;TST FOR ZERO 
istered 117261 001312 oo000€ MOVB  @XMTTAB(2),6(1) ;SEND A CHARACTER 
010012 105362 003312 DECB = XMTCNT(e2) COUNT CHARACTERS 
010016 O0S262 001312 I XMTTAB(2) ‘UPDATE TABLE POINTER 
piodee 000757 BR 1$ 
01 010346 2s: MOV R3, -(SP) 
010026 005062 001312 CLR XMTTAB(2) ;CLEAR TABLE POINTER 
010032 161002 SUB (RO) ,Re 
$103 popes CLR R3 
9} 000261 SEC 
010042 006103 3s: ROL R3 
610044 p0S202 DEC R2 


SEG 0023 
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TRANSMITTER ISR 


DJ11 EXERCISER AND ON-LINE TESTS 


08-SEP-77 15:07 


MAINDEC-11-DZDJB-E-D 


DZDJBE.P11 


RBUF 


THE DATA 


HE 


T 
AR 
NE # # 2, ALSO CLR CHAR PRESENT 


;ADD OFFSET 


et ERROR BITS FOR SPEED 
NE # TO LOW BYTE 


;MAKE SURE UPPER BYTE CLEAR 


;R2=CONTENTS OF RBUF (DATA) 


;R3=EXPECTED DATA 


;CLEAR TCR BIT FOR LINE 


;UPDATE TABLE POINTER 


; CONTINUE 


;MASK CHARACTER LENGTH 


;BRANCH IF OK 


“GET EXPECTED DATA 


;POP STACK INTO Re 
;POP STACK INTO Ri 
;POP STACK INTO RO 
;POP STACK INTO RY 
;POP STACK INTO R3 
;POP STACK INTO Re 
POP STACK INTO Rl 
POP STACK INTO RO 


; DUP 
RE 


¥ 

~ 

3 

- 

f : 

b 7 ma ka 8 Os 
— —_ a - oo = > 
ze #& a D000 E82. g — @ fever 
—+ ~_s & rr > oe a. 2 soe eee 
os 22% AAAS F SE xxxe% 
ate Sse avge®eesx Ssiczattn’ Sede Sasso 


BaSe Ssst SBBBbaehe> 38S dese Eger Wuze SSSsor 


SELLLLSAALERLE ELLE REARS LAA LEAL ALLA SALAS ERA REEL SLE L EELS ELL LERELELA SELES 


a 
r 


RC 
1$ 
es: 
3$ 
7$ 


ot a 
2 2 Eee 


SUR SSNS Str es SURARMEST PRR  RYSLLLTL 


177400 


105364 003313 





Sa am been ham Iau name am bam bam hem a bated wnt o-4 4 4 4 Ow 8 
QNoN000 AQOOOOROO00000 ONMNOOA00O 
8 4 8 4 8 we 4 8 4 4 O48 od wd ood 4 wo ond 8 4 4 4 4 4 4 wh 4 8 8 8 wk wg oh wd ee 
AQO0000000 ANd000000000 QOoOO0000000 QOO0OOOOOO00Or) 
rururune Ce ee ee | —urm io FAA 
A525 VACUUMS AUTUMN IBABRa Bos so ose es Fs NNN oeucuANcUNds 
oe SO FO Ok Gd Fd at Ft Od Gk OG Od ad nd nd nd dd nd nd Od nd nd nd rd rd nd rd ed Od Od Od ed wd wd wg St ee 
MMMmMmr MMMMMMM MMOMMMMOMNIMMOMOMOMMMMMMMOMMMMOMMMMMMMlC ™ 


LOe 
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:07 DATA TABLES 


OZDJBE.P11 08-SEP-77 15:0 SEG 0024 


3166 
3167 ; es ga ance pacpmnaetac om nnanen ia aman mene: 
3168 : 
3 g 5-2 9 9 A a a a a a a a 
1 
te Stat a oma! 3 BINARY fot 3 Ag BINARY COUNT PATTERN 
3155 Bipsis pipes BARASE Fea aEs “THE QUICK SILVER GRAY FOX...” 
3174 010214 Q00i106 70. : =70. 
3175 Ste 010244 SIXBIT >SW<2:0>=2 O40 THRU 137 
3176 OQ! 000106 70. ;SIZE=70. 
3177 Ql0e2e2e 015734 END 
3178 010224 000001 1 
3179 pines 016334 END+400 
3180 010230 000001 
3181 010232 016734 END+1000 
aigs 1 1 1 

1 1 1 END+1400 
3184 Ol 1 1 
3185S 010242 017734 END+2000 
3186 O1024%% 005015 177777 177777 SIXBIT: .ASCII <15><12><377)<377><377)<377> sCR-LF, FILLERS 
3187 010eS2 040 BINARY: . 40 
3199 010253 041 -BYTE 41 

(2) 010254 O42 -BYTE Ye 

(2) 0102eS5 043 -BYTE 43 

(2) O102S6 O44 -BYTE 44 

(2) 010257 04S -BYTE 45 

(2) 010260 O46 -BYTE 46 

(2) 010261 047 -BYTE 47 

(e) 010262 0S0 BYTE 

(2) 010263 051 -BYTE Sl 

(2) 010264 0Se2 -BYTE Se 

(2) 010265 053 -BYTE 53 

(2) O10266 0S4 -BYTE SY 

(2) 010267 oss -BYTE SS 

(2) 010270 OS6 -BYTE S6 

(2) 010271 057 -BYTE 57 

(2) 010272 060 -BYTE 60 

(2) 010273 061 -BYTE 61 

(2) 010274 O62 -BYTE 62 

(2) 010275 063 -BYTE 63 

(2) 010276 O64 -BYTE 64 

(2) 910277 OS -BYTE 65 

(2) 910300 O66 | -BYTE 

(2) 010301 067 -BYTE 67 

(2) 010302 070 -BYTE 7 

(2) 010303 071 -BYTE 71 

(2) 010304 072 -BYTE 72 

(5) Biose 998 ‘BYTE 74 

(3) Bios? Bee BE 9¢ 

(2) 010310 O7E -BYT 76 

(2) 010311 077 -BYTE 77 

(2) O1031e 100 -BYTE 100 

(2) 910313 101 -BYTE 101 

2) 010314 102 -BYTE 102 
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DATA TABLES 
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MATNDEC-11-DZDJB-E-D 


OZDJBE.P1!1 


BRS SSS SRNR URGSRABSH STIS EPPS BARRA ZSISS BBSRC 


SOGAS AAA AAU UYU MMM FT FTF TT TAMA BOG0DD BOK 


BE BSSIILNZ ATTAIN STS PPS BANAT SABE OREN Y 


Soe Keatie ee Ree Karte lame Reem Mee Ramm Teen Kee Reem Roam Ramm Damm Kaomm came Kaen Lane ame Ram Meee Kees arn Rae Ree Loe oe oe oe Sm hae nom nam Kae Kam em lem hem ham am am am hem ina item lean) 


ee 


an fe Po Poe foe. en ce. Joss oe Joa, ee eee fees fees em eee oe ers Jers Joe oem fa. ens Joss rc am. ram, foes fame mes femmes rome Fees Fees Fees oes ees Frees eee Fees Jeers Fees Joes Fea oe ean. hone as am, feos foes bows eas ba 
2OYNOOWOOWO0WOWOOVWVW0O00000000] OOOOWOOWWABNHOOOWHWOWOOWAHOOK000O00MN00M 


ee tt et et et et et et et Bt Nt et et Net St et Nt St Set et et et St Bt Nt Nt Bt St St St et et St Set et St Set Set St et eet et Set et Set et et Set Set et et 


SEG 0026 


O8-SEP-77 15:13 PAGE 48-o 


NOe 


MACY11 30(1046) 


DATA TABLES 


DJ11 EXERCISER AND ON-LINE TESTS 


08-SEP-77 15:07 


JBE.P11 


MAINDEC-11-DZDJB-E-D 


D 


DSSS Saisie totais ria et Perea TA LT et eT MTR PEE ERTL TTC Re 
popraranananaananananratata pani aad tad La adhd add adda ada ada ad dad Rd add 
Sasasssssssss45559= ass ssssssssssssssssssassssssssss 


SSS SEL SIS si imma ARNE RRS Cine 


upeenereeseeeeeneeeerestssteetestesiesegtes tes eats 


DEDEZELALELLALAL OLED LO ABAD EDL OD ARADO DOO LO DODO DEODOLADOD 
QOH OOWWVWWWO BOW WWWWWWOWOWWHWOWOWWOOWOOWNNHOH0O008000000000 


NA i la i i i i a ce a a ee ee ee ee ee ee ee ee he De De ce he ee ee ee oe ee he ee ee ee ee 


et tt et et et et et et et tt Nt Nt et et et et et Net et St Net Nt Net et Nt Nt Set Set Nt Set Set et Net Set Set Net et et et Net et et et et et et 


BO3 
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MACYi1 30( 1046) 


BRERECR CEASA RAMANA ase NA EAN RPE E Eee Ra 
dB ssasssasasasesesasesesesases anes ereereeeaeasesesetee 


"wea SCeertetrteetretetearterteaeaartr ah eaeastieteaeeeneeeaeeaeéeeseeeseeneenstsineeaeineen&k sas 


CEES SSSA RAR RBM RR SHAR SR ARTUR N SINR PT TTT PEs ai 
8 ‘ O-—UM Tino. 
Reh gape g aso rr SR RNa OR aN e or prs a nom REDS ATS 


toe AAACN at teed ett MIM tne tutete teen at ata 
~—§ —=§ QNOOWWIIWIOOOWWWIOOOWOBOWOWOHOWOHOWOOOOOWOOWHVWOWOWOCODMOOOMOOWWOWOHOOOAOOO0Oc 


SEB 77 TEibr RRCTSER MO OW ra PRRLES 





tt et et et et et et et Nt Set et et Bt at et et Bet Bt Set St Set St Set Set Set Set Set Net Set Set Set Set Set Set Set Cet Bet Set Set Set Se et et ee 


CO3 


SEG O0ee 


-~ r i s> . rAacse i] 
12.0 LAZY DOGS! 


3° 
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MACY11 30(1046) 


QUICK SILVER GRAY FOX JUMPED OVER 9,876,543, 


> 412) (377) «377> «377 «377> 


BER RR SR eRRRRRS RSENS So -amz non SAU RAUREEN AIAG SP 
; 
- z 
Ra 
u 
3 . 
SS 


i RARAR SANA RSASRSEREREH SaBSEMMB SANA ARAN RRNRENRARAS Sk 
Hidhbnbiubnddddddddsaendaguddiddodidcuddaadagagaasaad oS 


Se Kee Man eae ene es am ee eam, eae eee eam pam eas ean on. fan pam han am bom fan fom Sean an an Joan foams foam fon fon fom fon. foam fon boon fom ean fon Son, fos fom os fo eae. fae. fas ham. om. foam. ams hams ean fea pas iow ban.) 
~—— QOOWWOOBDWWIOOWOOWWAWWIWHWWWOWNOOODOWOWOWOVWOOWNHOA00WH00000000 OO 


bw} LLL LLL RN ES FR ER FRR FR REE BERBERA OVOVM St i 
ee 


ee et et et et eet et et et et et et et eet eet eet ee Ne et Nt et et et St St et et et Bet et et eet et et et et et et et Set et et et et et ee ny 


PENSE PLL Oe-se=77 Te:b7 Oe Dra FaLeS 


113 O44Se3 


10ee6 $11 
a 053114 Tk Baseoe 
1 14 1 i 
1 1 
1 1 
1 
1 
010746 
Ql 000 
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SEG 0029 


E03 
SEES BER vy EL PORTSER BYTE TES recise TAM SRHI Ra SEALE ebideod = se oa 


3215 . PPERESELESERESSL RR EESESEERSERRERS ERESEERERERRELERSAPEEER EL EERE REESE EE ESSE 
3216 PROGRAM 2: ON-LINE TI-ECHO RCISER 
$617 : T TS LAST RECEIVED ON ITS RESPECTIVE 
#18 ; LINE. £ CARRIAGE RETURN AND LINE FEED ARE INSERTED 
igs : SELSSSSSEEKSLESSAESSSESEREREAASSELESERSEERSSELRRRESEELE REESE EERE SELSSES 
3222 910762 oo000s PROG2: RESET bite ; CLEAR ouT THE E WORLD 
, s 
553 Bile es Buses peAseo 177776 Hoe ESIC: Stes i BRORES 70 LEVEL? 
3225 010776 012701 001312 MOV exMTtAB, RI *FIRST TABLE POINTER 
3226 011002 Ole70e 001400 MOV #1400, ‘Re “LENGTH OF TABLES (WORDS) 
3227 il I 18: CLR (R1)+ ;CLEAR THE TABLE 
3228 91101 DEC Re 
3229 011012 001375 1§ 
3230 011014 012702 O00400 MOV #400, R2 sLENGTH OF MASK/COUNT TABLE 
3231 011020 O00S201 2s INC Rl ‘SKIP 
3232 011022 105021 C (R1)+ ‘CLEAR COUNT 
3233 011024 005302 DEC Re 
sex 011026 001374 BNE 24 
3236 sROUTINE TO INITIAL DJ11’S AND THEIR ISR’S: 
3237 ‘SET UP ALL Nets ORS 
3238 ‘SET UP DEVICE ADDRESSES IN LINKER ROUTINES 
3239 ‘SET CSR’S EVERYTHING D 
s40 ‘SET TCR’S, ALL LINES ENABLED 
3242 011030 o0so00 P2INIT: CLR RO 
3243 011032 013701 001270 MOV DEVADR, R1 
3244 011036 013702 001272 MOV VECADR; Re 
3245 011042 012703 Olle20 MOV 8R2SRO,R3 :SET UP POINTER TO LINKERS 
3246 O11046 010322 1S MOV R3 (R2)+  ;SET UP RECEIVER INTERUPT VECTOR 
3247 011050 013722 001274 MOV RCVLVL, (Re)+ 
3248 011054 022323 CMP (R3)+,' (R3)+ ;ADD 4 TOR 
2249 011056 010113 MOV 1, (R3) ADDRESS OF CSR 
3250 011060 062723 o00002 ADD 82 (R3)+ ADDRESS OF RBUF 
3251 011064 005723 TST (R3)+ 
3252 011066 010322 R3 (R2)+  ;SET UP TRANSMITTER INTERUPT VECTOR 
3253 011070 013722 001276 XMTLVL, (R2)+ 
3eS4 011074 022323 CMP (R3)+, (R3)+ 
3255 011076 010123 MOV Ri (R3)+  ;ADDRESS OF CSR 
3256 011100 012721 ososo1 MOV #S0S01, (Rl)+ SET UP CSR 
7 "BITO = RECEIVER ENABLE 
*BIT& = RECEIVER INTERUPT ENABLE 
3255 ‘BIT = TRANSMITTER SCAN ENABLE 
3260 ‘BIT12 = STATUS ENABLE 
3261 ‘BITI4 = TRANSMITTER INTERUPT ENABLE 
3262 011104 005721 TST (R1)+ 
3263 011106 006300 ASL RO ;UNIT 8 # 2 
3264 O11110 016011 001220 MOV SVSWO(RO),(R1) ;3SET TCR BITS FOR SELECTED LINES 
3265 011114 006200 ASR RO “RESET UNIT COUNTER 
#66 Ol1116 012737 000001 001260 MOV #1 :SET UP MARKER 
C1lle4 Ole MOY (R3)+, RY :SET UP OFFSET TO TABLES 
3268 Olile6 035711 001260 4§: BIT MARK,’ (Rl)  :CHECK FOR LINE SELECTED 
3269 Slil3e o0140€ BEG zg 


FO3 


ee ge 11-DZDJB-E-D _ DJ11 EXERCISER AND ON-LINE TESTS MACY11 30(1046) O8-SEP-77 15:13 PAGE 49-1 
OZDJBE.P11 08-SEP-77 15:07 PROG2: ON-LINE EXERCISER CTRANSAIT LAST CHARACTER RECEIVED) SES 0031 
oS aiitas 01 015604 001312 MOV sMSGP2, XMTTAB(4) ;SET UP XMTR TABLE 
1 Ql11 01 00004S 00331e MOV 84S XMTCNT (4) :SET UP COUNT 
lil SS: TST (R454 ;INC OFFSET TO NEXT LINE 
lll 001260 MARK 
111 1 BCC 4§ 
3275 te 022121 oe (R1)+, (R1)* ;ADD 4 
ca Ot ies 001266 MP . UNITS 
0111 1326 BNE 
Fas 011172 042737 000140 177776 BIC 8140, daPs ;LOWER PROCESSOR PRIORITY 
3284 5 SE EEE EE SE go a a a a a a a 
328S ; F TO /WRITE MEMORY 
ru 5 Se-EAEE  E a d a aa  d a a a 
011200 012700 d2000C FORPe: MOV #20000 , RO ;TOP OF 4K BANK OF MEMORY 
a I 1Dbe bossye 1§ SDE (RO) ;FAST /WRITE TO MEMORY 
341 O11818 Bora7e is sRABIO REPEAT 
3eSe Ollele 005700 TST RO “CHECK FOR LOC 0 
sa plist? TE cae 1$ :BRANCH IF MORE MEMORY 
sa llelé FORP2 “LOOP FOR EVER! 
3239 5 HEHEHE HEHEHE EHH EE EEE EE HEE EE EEE A a A ab ab db ab abt 
3300 :PROG2 LINKERS TO DJ11 INTERRUPT SERVICE ROUTI 
3301 1 HMHHIHHMHMHHHHHHEHEHHHHHHHHEHHEHE HEHEHE a ee eet 
3308 004037 012012 R2SRO: JSR 2 
160012 000000 «160012+<0#10>>, <O#40> 
011620 X2SRO: JSR RO 


= 
Tw 
: 
i 


PexISR 

. WORD i <0#10>>, <O#40> 
ISR 

-WORD ¢1600124<1#10>>,<«1#40> 


RO, PexISR 

ss <1#10>>, <1#40> 
P oe: 

nb 1e+<2%10>>, <2#40> 


SEIS PRON PPO 
3 
8 
j 


Rouen 
eke 
73 


1 rts R2SR2: JSR 
boi69 X2SRe: JSR 
100 WORD <1 +<(2%10)>, <2#49) 
12012 R2SR3: JSR RO, PERISR 
at WORD ¢160012+<3#10>>, <3#40) 
314 . WORD as (3#10>>, <3#40> 
«WORD ¢160012+<4#10>>, <4#40> 
011620 X2SR4: JSR RO, PexISR 
; <1 <4#10>>, 4#4D> 
Meg me Ee 
; <(1600124<5#10> >, <S#40> 


i 
: 


_— 
mr 
c=) 


«5#10)>, <«S#40> 
12+<64#10>>, <6#40> 
<1ODGEDE:GFI0> >, <6#40> 


—38 
ee 
B= B2 2H 


LOGI ALOE AEA AAO AAO OOOO 


& 7-0 +0 +b +0 + 0-2 d-- 0-0 O-— & + b= 0 & = & + &— b < B+ b= b= & = &— 6 B- 2 b= B+ 
ee ee ee ee ee ee ee ee eee ee ee eee 


: 
Bees 


SIPERA ESSERE 


OOOO OOOOOOOOOOOOOOOOOO0000000 


& 28-2 Bb 50 + b= bb b+ & 2 + Bb B= Oh BO B= + = = he 
& 28 5b Bb om 2-5 PHB =H +H =e 2 B= & +O = B= + Bs = = Bb B= b— & = > He FH 


D~ F. 
oOo 


a 
8 
8 
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DZDJBE.P11 08-SEP-77 15:07 ISR LI 
(1) OLI4O4 1601 . WORD 
(1) O11410 160195 yee X2SR7: JSR 
BUMS aed? reso: 3a 
(1) Ol ig0lle 0 * “WORD 
(1) 011430 atnted 0 X2SR10: JSR 

t WORD 

(1) eta apnag7 : R2SR11: JSR 

(1) O11444 60122 OC . WORD 

(1) 011450 004037 011620 X2SR11: JSR 

(1) pt izo §p0439 neatee R2SR12: ik 

(1) O11464 160132 000500 . WORD 

(1) O11470 011620 X2SR12: JSR 

(1) Biienn 1201 R2SR13: Fa 

(1) 011504 160142 O00S40 . WORD 

(1) G11519 0 011620 X2SR13: JSR 

(1) 01150 O ede R2SR14: im : 

(h) OL1SS0 011620 X2SR14: ier : 

(1) Bt tea le0le2 R2SRIS: isk : 

(1) O11544 160162 000640 . WORD 

(1) 011550 004037 011620 X2SR1S: JSR 

(1) O11554 1601 000640 . WORD 

a) BLES Pease Ret: og 

(1) b11570 OOO? 011620 X2SR16: JSR 

1) 011600 Oona? ee R2SR17: JSR ;, 

(1) O11610 rinieig rete X2SR17: JSR 

(1) 011614 160210 000740 . WORD 
3312 
3313 
3314 
Be 
3317 011620 P2XxISR: 

(2) 011620 O10146 MOV 
aia Ollesd pieeoe NOV 
3319 01 1b¢8 0571 1S: Ist 
350 bt Bs 1 eEtBe 000007 MOVB 
3222 011636 906 302 gst 
3353 STEMS 003312 TSTB 
3325 O11646 413 BEQ 
335% Sites F 1 901312 000006 ME: 
$352 tlees } 315 ¢ 
3329 O11666 601357 BNE 
3330 O11670 O0S262 001312 INC 








iPROGS TRANGHITIER INTERRUPT SERVICE ROUTING 
1 a a dd de a 


MACY11 30( 1046) 


~ 

g 
eal 
rT 


+<(7#10>> , <7#40) 
7#10>>, <7#40> 
10#10>>, <10#40> 
10#10>>, <10#40> 
11#10>>,<«11#40> 
11#10>>,<«11#40> 


ee 2#10>>, < 12840) 
(12#10>>, <12#40) 
SR 
SR 


—8 
S 


AD“ a~ 

i Can 

Bane 
RS ES hs ES ES PS | 
a A~ A” AAA 


3 
g 


828 
$ 


+ 


« 
« 
« 


B= 


¢160012+¢13#10>>, <13#40) 
ri ¢13#10>>, <13#40> 
124¢14#10>>, (14840) 
< (14#10>>, <14#40> 
¢1600124< 15#10>>, «15#40> 
< tyson >, <15#40) 
«16001 SC1GH1O> > , (16#40> 
#1600208 < 1610) >, «16840> 
RO, PeR 
160012+<17#10)>, <17#40> 


RO, PexISR 
<(1600204<17%10>>, <17#40) 


= 


O8-SEP-77 15:13 PAGE 49-2 


INTERRUPT SERVICE ROUTINE 


‘PUSH R1 ON STACK 


~(6) PUSH Re ON STACK 
(R1) oven FOR TRANS READY 


ets) 
(mat ) 
XMTTAB (2) 


;GET LINE NO. 


Tat FOR ZERO 


;GET OUT 
@XMTTAB(2) ,6(R1); 5 SEND A CHARACTER 
T CHARACTERS 


:C 
: CHECK Bs MESSAGE OR DATA 
‘OPDATE TABLE POINTER 


SEG 0032 


HO3 
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DZDJBE.P11 08-SEP-77 15:07 TRANSMITTER ISR SEG 0032 

3331 011674 000754 BR 1S 

3332 011676 105162 004313 2s: COMB © CNTTAB(2) CHANGE FLAG 

3333 1170 001430 BEQ 3$ : IF WAS DATA 

38 1] j 92312 001312 MOV SRCVTAB, XMTTAB(2) ;SET UP POINTER TO RECEIVER TABLE 
11712 131 ADD Re XMTTAB(2) ADD OFF 

3335 117 6 1 110 003312 MOVB #72.. XMTCNT(2) :COUNT 72. CHARACTERS TO THE LINE 
ll 1 le TSTB = RCVTAB(2) -CHECK FOR A 

3338 011730 001336 BNE 1S “BRANCH IF REAL DATA 

$333 O1173¢ 461002 SUB (RO), Re *RECOVER LINE NUMBER 
11 ASR Re 

3341 011736 005037 001260 CLR MARK ;SET UP MARKER 

3342 011742 000e61 SEC 

3343 011744 006137 001260 cs: ROL MARK ;MOVE MARKER 

sai 011750 C Re * COUNT LINES 
11 1 S : F MORE 

33% 011754 043761 001260 O00004 - BIC MARK, 4(R1)  ;CLEAR TCR BIT 

a7 011762 1 BR 1$ * CONT INUE 
11764 Ole76e 015371 001312 3S: MOV #RETURN, XMTTAB(2) ; TYPE CARRIAGE RETURN, LINE FEED 

3349 011772 112762 000002 003312 MOVB 2, XMTCNT(2) :COUNTER OF 2 CHARACTERS 

3350 012000 000712 BR 1§ 

3351 012002 4g: 

(2) O12002 012602 MOV (6)+,Re sPOP STACK INTO R2 

(2) 012004 012601 MOV (6)+,R1 :POP STACK INTO RI 

(2) 012006 012600 MOV (6)+,RO “POP STACK INTO RO 

3352 012010 o000d2 RTI 

33S7 : LESSSKSSSSSSLESAERAESESESAESERESARERRARASEAEREASRE RESELL LLERHARATEEEETES 

3358 “PROG RECEIVER INTERRUPT SERVICE ROUT! 

3353 : SSESLSESSASKSASERAESHALESESESESSSEESERERLARERELRARERLREHLASLALALALALERSES 

3361 012012 PORISR: 

(2) OleOle 010146 MOV R1,-(6) ;PUSH R1 ON STACK 

(2) 012014 O10246 MOV Re’ -(6) *PUSH Re ON STACK 

(2) 012016 010346 MOV R3,-(6) “PUSH R3 ON STACK 

3362 012020 012001 MOV (RO)+.R1 :GET ADDRESS 

3363 Ol2e022 011102 1S: MOV (R1), Re "READ THE DATA 

3364 Olepe4 100053 BPL 7§ ‘BRANCH IF NO CHAR PRESENT 

3365 012026 032702 070000 BIT #70000, R2 “CHECK FOR ERRORS 

3366 012032 001402 BEG 2s *BRANCH IF OK 

3367 012034 104002 HLT+2 RECEIVER ERROR 

3368 *RISRBUF ADDRESS 

3369 *RE=CONTENTS OF RBUF 

2370 *BIT12=PARITY 

3371 *BITIS=FRAMING ERROR 

3272 ‘BITIYSUART OVERRUN 

3373 012036 000771 BR 1S FORGET THE DATA 

275 012040 010203 2s: MOV Re, R3 ;DUP THE RBUF 

S58 seas 105003 CLRB RG *CLEAR THE DATA 

3377 012044 000303 SWAB sé ‘LINE # TO LOW BYTE 

3378 012046 106303 ASLB = R33 ‘LINE @ # 2, ALSO CLR CHAR PRESENT 

3379 O1ebe0 061003 ADD (RO) .R3 :ADD OFFSE 

3280 O1e0S2 136302 004212 BITB masKkl3),Re *CHECK CHARACTER LENGTH 

3361 012056 00140! BEG 3$ ‘BRANCH IF OK 

3282 012060 104002 HL T+2 “CHARACTER LENGTH ERROR 

3363 ‘RISRBUF ADDRESS 


03 
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OZDJBE.P11 08-SEP-77 SEG 0034 


;R2=CONTENTS OF RBUF (DATA) 


3384 
3388 012062 05763 002312 3S: TSTB = RCVTAB(3) :CHECK FOR BREAK 
1 1017 BNE 5 IF REAL DATA 

3387 012070 110263 002312 MOVB =- Re RCVTAB(3) :SAVE THE DATA 
$388 it 1003 SUB Rd), R3 sRECOVER LINE NUMBER 
3390 lel 001260 CLR MARK ;SET UP MARKER 
3391 012104 000261 SEC 
3392 012105 006137 001260 4g: ROL HARK ;UPOATE MARKER 
33 pistis sien BPL 4§ : H IF 
339S 012116 053761 001260 o0000e2 BIS MARK, 2(R1) ;SET TCR BIT 
3% 012124 000736 BR 1S : CONT INUE 
3398 012126 110263 002312 SS: MOVB Re RCVTAB(3) SAVE THE DATA 
3399 012132 105163 004313 COMB =-s CNT TAB(3) T FLAG 
#100 01g) 36 012763 015371 001312 MOV RETURN, XHTTAB(3} TYPE CARRIAGE | RETURN, LINE FEED 

1 012144 112763 O00002 003312 MOVB 2, "XMTCNT(3) ;MESSAGE LENGTH 
3402 Ol2lS2 000723 BR 1$ 
3403 012154 7S: 

(2) 012154 012603 MOV (6)+,R3 :POP STACK INTO R3 
(2) 01215 Ole60e MOV (6)+/Re :POP STACK INTO Re 
(2) O12169 012601 MOV (6)+/R1 :POP STACK INTO RI 
(2) Olelbe 012600 MOV (6)+,R0 : POP STACK INTO RO 
3404 012164 900002 RTI 


PEP EP REET E ES 
NOU .£WIfUu-O 


OOOO OOOOOO0O0000 


fj 
eo 
b= bb b= b= & - r= b— b= b— BF Oe 


Freer peepee e py 
Ran 


OOO OOOOOO0O0O00O0O 
0 0 


aca Ttiicuer ss tse ee 


OdodOO0O000O 
0 = b= bb 0 0 
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O8-SEP-77 15:07 PROG3: ECHO EXERCISER SEG 0035 


$ eee en ee enn ne tee ee ee ee 
: POTOUTTTT TT TT TTT Titi tiii iii tit tii iit iiiittitiittittiitiitit sy 


2166 O00005 PROG3: RESET ;CLEAR OUT THE WORLD 
2170 012706 001200 evens HOV aSTACK, ae “RESET THE STACK POINTER 
ae $9598; 1 ig MOV Sairtes, Rt Pest TAGLE POINTER 
01 001 MOV #1400, Re ‘LENGTH OF TABLES (WORDS ) 
518 1S: cLR (R1)+ *CLEAR THE T 
14 C he 
2216 001375 BNE 1S 
000400 MOV #400, Re i LENGTH OF MASK/COUNT TABLE 
I 2$ INC R1 :SKIP_ MASK 
105021 CLRB Ss (RL) + *CLEAR COUNT 
DEC Re 
5534 Dyea7 oye 
4 Ol 015734 001264 MOV 8ENO, BUFEND ;GENERATE LAST BUFFER ADDRESS 
2242 063737 O0leb2 001264 ADD BUF STZ, BUFEND 
2250 012705 015734 MOV #END, | RS ;SET UP BUFFER POINTER 
sROUTINE TO INITIALIZE ALL DJ11’S AND THEIR ISR’S: 
‘SET UP ALL INTERRUPT VECTOR 
*SET UP DEVICE ADDRESSES IN LINKER ROUTINES 
:SET CSR’S EVERYTHING ENABLED 
*SET TCR’S, ALL LINES ENABLED 
2254 005000 P3INIT: CLR RO 
013701 001270 MOV DEVADR, R1 
13702 001272 MOV VECADR, Re 
012703 012550 #R3SRO,R3 ;SET UP POINTER TO LINKERS 
2272 O1G3¢¢ 1S: MOV R3 (Re)+  ;SET UP RECEIVER INTERUPT VECTOR 
2274 Ol 001274 MOV RCVLVL, (Re)+ 
2300 CMP (R3)+, (R3)+ ;ADD 4 TO R3 
2302 010113 MOV Rl, (R3) ‘ADDRESS OF CSR 
g304 062723 000002 AOD e., (R3)+  ; ADDRESS OF RBUF 
5318 MOV R3 (R2)+  ;SET UP TRANSMITTER INTERUPT VECTOR 
2314 013722 001276 MOV XMTLVL, (Re)+ 
2320 3 CMP (R3)+, (R3)+ 
322 010123 MOV (R3)+  ;ADORESS OF CSR 
012721 oso400 MOV #50400, (R1)+ ;SET UP CSR, TRANSMITTER ONLY 
:B118 =f ITTER SCAN ENABLE 
;BITle = 318 US E 
‘BITI4 = TRANSMITTER INTERUPT ENABLE 
2330 005721 TST (R1)+ 
2332 006300 ASL :UNIT # # 2 
ga 016011 001220 MOV SVSWO(RO), (Ri) ;SET TCR BITS FOR SELECTED LINES 
noe ASR RO *RESET UNIT COUNTER 
2x4e 012737 000001 001260 MOV “SET UP MARKER 
350 012304 MOV (R4)+. RY -SET UP OFFSET TO TABLES 
10246 MOV Re, -(6) : PUSH Re ON STACK 
354 O10346 MOV R3,-(6) :PUSH R3 ON STACK 
2256 11 00i260 2s: BIT MARK, (RL) :CHECK FOR LINE SELECTED 
ezte 001420 BEG 6$ 


SRE R Reo OB aR SARE 


ERROR 
WOOD CWO 


RRR 
oRRSR 


01 


¢511-DZDJB-E-D DJ11 EXERCISER AND ON-LINE TESTS MACY11 30(1046) O8-SEP-77 15:13 PAGE SO-1 
ll -77 15:07 PROG3: ECHO EXERCISER SEG 0036 
012364 010564 001312 MOV RS, XMTTAB(4)  ;SET UP HEADER MESSAGE 
012370 010564 002312 HOV RS, _RCVTAB (4) igeT UP RECEIVER TABLE 
Bi S00 Bt aees pOLees - HOV ans RS. i : UF E POINTER 
BiSaoe AdTaos ' e i BRANCH TF ERD 
012410 005302 DEC Re :COUNT BUFFER SIZE 
Olevi2 001374 BNE 3$ “BRANCH IF MORE 
Olevi4 000403 BR 6$ ‘BRANCH IF DONE 
GIEUS deel Be Bre BE 
Ole422 001375 ; BNE 4§ ‘BRANCH IF MORE 
Dieta dos724 ceaaeie 6S: Ist (Ra)4 INC OFFSET TO NEXT LINE 
O1e432 103351 BCC 2s 
012434 012603 MOV (6)+,R3 POP STACK INTO R3 
012436 012602 MOV (6)+' Re :POP STACK INTO R2 
012440 lel CMP (R1)+, (R1)+ ;ADD 4 
Olewe INC RO 
Ole444 020037 001266 CMP RO, UNITS 
012450 001310 BNE 1$ 
012452 042737 000140 177776 BIC $140, a8PS —§ ;LOWER PROCESSOR PRIORITY 
i BROGS FOREGROUND PROGRAM TO START RECEIVERS, THEN EXERCISE MEMORY. 
eee es arseneceeseansserrseecacsansesestaeesasuasaste EERERERSRSEAERSLERERE 
012460 012701 001312 FORP3: MOV 8XMTTAB,R1 
12464 012702 O00400 MOV ,Re 
b1e470 bos711 1S: TST (RI) ; CHECK FOR XMTR TABLE CLR 
biscoo pees} CCoade oe $69 10 NXT LINE ENTRY 
012502 001372 BNE 1§ ‘BRANCH IF MORE LINES 
012504 013700 001266 MOV UNITS, RO :SET UP UNIT COUNTER 
012510 013701 001270 MOV DEVADR, RI “AND DEVICE ADDRESS POINTER 
012514 052711 000101 2s: BIS #101, ' (Rl) 3SET RECEIVER ENABLES OF 
BUGS RE NtaneT Ewen 
012520 062701 000010 ADD #10, Ri : E TO NEXT DJ11 
Bisese poi a7e re OOS a ae 
01530 012700 o20000 MEMX3: HOY #20000, RO TOP OF 4K BANK OF MEMORY 
Oise BOS540 1S: BOC 5 {RO FAST REQO/WRITE TO MEMORY 
Biseag Boi ae4 BeOS ie FOR LOC Oey 
012546 000770 MEMX3 *LOOP FOR EVER! 
‘PROG? LINKERS 10 DJil INTERRUPT SERVICE ROUTINES 
Teanga, pa scastibensasetnegestenssteccessensescesansseusonssneuees 
012550 904027 013300 R3SRO: JSR 3RISR 
012554 ieodle occcod WORD Me DB les<D¥10>>, <O#ND> 
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LO3 
MACYI1 30(1046) 
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tero7 ISR LINKERS 


08-SEP-77 15:07 
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OZDJBE.P11 
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a i an “a Ps - cy Po Pv “< Pi a in ian Ps - ,~ = > = ~ mn oe = —~ Po ee 
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SECT RE R RS SSR ERE RTS ESERRARSE ERS 
ae ee a2 3 $23 
Gi + is Gis Us LATASAHLASHSASHS HT AT x Bix anes Sx ois Bix Hs hrs ss os 
bigs aera iain ia as ae acters eae ne anata ee a eS 
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JSR 
WORD 
JSR 
WORD 
JSR 
WORD 
JSR 
WORD 
JSR 
WORD 
JSR 
WORD 
JSR 
WORD 
JSR 
. WORD 
JSR 
. WORD 
JSR 
WORD 
JSR 
WORD 
JSR 
WORD 
JSR 
WORD 
JSR 
WORD 
JSR 
WORD 
WORD 
WORD 


R3SR12: ISR 
X3SR15: JSR 
R3SR16: JSR 


X3SRO: 
R3SR1: 
X3SR1: 
R3SR2 


See es eee 
EEEHB aban UeUE GB Gngag OB NE stoz anggan anata anansgsganan 


RU RRERER RE RERERRRR RRR GRR R RCA KHRRR EE RR aE REARS 


beam ee een fen. foam. Soaen fue Spam fam foam foam, fea fees pe foam fea uae fumes Joa ean foam foam fan Joan Juan pan. pan han pon jen pan pan pan fom pan fam pan hon fam ban has an as ban pan jen pan paw an pan jan pan pan jan pan pan 
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OZDJBE.P11 08-SEP-77 15:07 ISR LINKERS SEG 0038 
(1) Q131 X3SR16: JSR 
1} Bigtse 0886 | BoaeBo 7FORO CTeGEe0+<16410>>, geo) 
() TeTE se Shaeag _— | boBlesc17810>>, (17%40) 
one a 
(1) O131%G Mri 013150 X3SR17: JSR nF 
(1) 013144 160210 000740 . WORD SR ize10>>, (17%40) 
23 gee SE AE Se Sk Se SE a A a Sa a A a EEE EES 
:PROG3 TRANSMITTER INTERRUPT SERVICE ROUTINE 
2S 1HHHHIHGHEHEIHHHEIHEHEHEHEIHHEHEHEI HEHEHE AEH Ee ae 
3537 013150 P3XxISR: 
(2) 013150 010146 MOV R1,-(6) PUSH R1 ON STACK 
(2) 13152 0} MOV ’-(6) “PUSH Re ON STACK 
453 131 1 MOV (RO)+,R1 
3539 013156 il 1S: TST (R1) CHECK FOR TRANS READY 
3540 013160 100043 BPL 
3541 013162 116102 000007 MOVB 7(R1),Re >GET LINE NO. 
3542 013166 906302 
243 013170. 1002 ADD 
44 013172 117261 001312 000006 MOVB arts), 6(R1);SEND A CHARACTER 
ei ot 001312 CLRB aXMTTAB(e) iC TABLE AFTER USE 
1 001312 INC XMTTAB(2) TE TABLE POINTER 
3547 013210 001264 001312 CMP BUFEND, XMTTAB(2)’:CHECK FOR END OF BUFFER 
EE ed ed ft Fe ae 
1 1 015734 001312 MOV XMTTAB(2) ;RESET ER POINTER 
3550 013226 105772 001312 cs: TSTB 3s @XMTTAB(2) -CHECK NEXT CHARACTER 
351 O1323¢ 90 351 BNE “BRANCH IF MORE DATA 
1 1 2s MOV -(SP) 
3553 013236 O0S062 001312 CLR XMTTAB(2) ;CLEAR TABLE POINTER 
3554 O13e42 161002 SUB (RO) ,Re 
3555 Ol ASR R2 
so ot CLR R3 
1 1 SEC 
3558 013252 006103 3$ ROL R3 
3559 013254 005302 DEC R2 
3560 013056 00375 BPL 3§ 
3561 Ol booed 000004 BIC R3,4(R1) ;CLEAR TCR BIT FOR LINE 
3562 013264 012503 MOV (SP)+,R3 RESTORE R3 
3563 O01 000733 15 
3564 Ol 4§: - 
(2) Ol 012602 (6)+,R2 ;POP STACK INTO R2 
(@) O13¢7¢ O1eb01 MOV (6)+/R1 “POP STACK INTO RI 
(2) Ol 12600 MOV (6)+/RO :POP STACK INTO RO 
3565 013276 000002 RTI 
3570 ; REALE EA REESE EAE EERE EEE LARA LE RRER ERLE REALE LALLA LER LA ERA ERES 
3671 : RECEIVER INTERRUPT SERVICE ROUT 
3276 13 a a a a a A a a ad a 
3574 0123N0 P3RISR: 
(2) 013300 010146 MOV R1,-(6) ;PUSH R1 ON STACK 
(2) 013302 010246 MOV Re, -(6) *PUSH Re ON STACK 
2 ee blone my cit) HUB on Sk 
£75 013310 O12001 MOY (RO)+,R1 GET RBUF ADDRESS 


BBORREORER 


af af bab a a at 
0D NOW £WM-O 


BER SRRPURON 
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Coli O20 FOE EP 7 1) pe AND ONLI AS FSER ise ISR MACY11 30(1046) O8-SEP-77 15:13 PAGE SO-4 oe eon 


Pil 
12 0 1S: MOV (R1),R2 
316 BPL sé 


1 ; 
8 1 $ Fr 
1 BIT #70000, R2 *CHECK F 
1 Q 2s : F 
1 1 HLT+2 sRECET 
* RI=RBUF RODRESS 
RTT iocPaRTTY ERROR 
iBITL3=f RAAING ERROR 
013326 000771 BR 1$ iBT TP ano DA A 
ee ioe an ea 
Osa 000304 RY “LINE # TO LOW BYTE 
1 1 ASLB sR ‘LINE 8 ® 2, ALSO CLR CHAR PRESENT 
O10 06 i004 ADD (RO) .R4 :ADD OFF 
Ol 13eH0e 004312 BITB HASKEN) ,Re * CHECK CHRACTER LENGTH 
pt se8 Sef 104002 HLT+2 : thr LENGTH ERROR 
*R1=RBUF Ss 
*RE=CONTENTS OF RBUE (DATA) 
013352 4 002312 3S: TST RCVTAB(4) *CHECK FOR UNSELECTED LINE 
013356 001002 BNE BRANCH IF OK 
013360 pHoaS HLT+2 s RECEIVED DATA ON UNSELECTED LINE 
*Re = RENTENTS OF RBUF 
013362 BR 1$ IGNORE THE DATA 
013364 105774 002312 4g: TSTB = SRCVTABCY) *CHECK FOR DATA BUFFER FULL 
013370 001403 BEQ cs *BRANCH IF OK 
013372 104002 HLT+2 :SOFTWARE DATA BUFFER OW 
“POSSIBLE TRANSMITTER PROBLEM 
?R1 = RBUF ADDRESS 
*R2 = CONTENTS OF RBUF 
;NOTE: IF THE ABOVE ERROR WAS DUE TO OVERLCAD, INCREASING THE CONTENTS 
: OF “BUFSIZ™ MAY RECTIFY THE PROBLEM. 
: "BUFSIZ™ MUST BE A MULTIPLE OF 2. 
: NCREASING IT MAY CAUSE THE BUFFERS TO OVERFLOW 4K 
013374 000137 012166 JMP PROG sRESTART GN THIS TYPE ERROR 
013400 005764 001312 cs: TST XMTTAB(4) ;CHECK FOR TRANSMITTER ACTIVE 
013404 001414 BEQ *BRANCH IF INACT 
013406 110274 002312 MOVB Re, @RCVTAB(4) ;PUT THE DATA IN THE BUFFER 
Oly1e O0S264 002312 INC RCVTAB(4) “UPDATE POINTER TO NEXT SPACE 
O16 023764 001264 002312 CMP BUFEND, RevTABC4)’ “CHECK FOR END OF BUFFER 
13424 001332 BNE H IF NOT 
01346 o12764 015734 002312 HOV He ,RCVTAB(4) ; RESET BUFFER POINTER 
013436 012764 015734 O02312 6S: MOV RCVTAB(4) ;RESET TABLE POINTER 
013444 O16464 OO0e312 O0131e MOV RV TBB XMTTAB(4S 
Oi aise 110274 002312 MOVB SRCVTAB(Y) 
01 005264 O0e3le INC Saariet ;UPDATE POINTER TO NEXT SPACE 
eae ie 
1 CLR R3 
013470 000261 : 
013472 006103 7S: ROL R3 


BO4 
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560 READ TTY UNTIL CR 
;PUSH RI ON STACK 
BUSH AS ON STACK 


;CHECK FOR “P” 


;BRANCH WHEN DONE 
;BRANCH IF BAD DATA 
‘BOP STACK 

TACK 
POP STACK I 


READS 


SUSRBSESRRAcebamax dadadaauaJEBEEEE 


; SUBROUTINE TO SAVE INPUT AS OCTAL NUMBER 
NHRE 
Ki 
( 
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014274 READIN 


ee 
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015166 


ats 
rT 


17776 14146 58: 
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= eg ER 
PPPSR NUON BINT OB at 
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; TEMPORARY STORAGE FOR PS 


PSTEMP: 0 


014146 000000 


8 
’ saz 

s -_— a~axa. 
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GaxGyer? fs 
as | en 
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TihPUT, 
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88177560 
8 prt 
4” 
,(3) 
+2 


ww jw 
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rT 8 r w 
ti -_ -_ 
oo - Oo o 


Seen se 


RORUSRMONSIZ 2084 
ee rr) cucucucucucy 
rr7rr7ry7777777TIT TT 
Ce kee hate Roce Ieee Ieee Recut Ieee Ieee ett Rect, ete ett Ieee, Ie, Rel) 


OOOOOOOOOOO0NOMO 


ee 
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ll 08-SEP-77 15:07 TTY INPUT ROUTINE 
(1) 014236 000004 015104 TYPE . TYPE sECHO IT 
(1) Ol lee7e3 000015 CMPB sé IS, (3) ; CHECK FOR RETURN 
(1) O14 BNE 2s ‘LOOP IF NOT. RETURN 
(1) Ql 014274 S TNHRE 
(1) 01 1 A BEQ 4 
( pt aseR 77777 5 ee oF 9) AP RETURN (THE 15) 
(Seam 8 woe eet 
(1) 01 RTS 
t) Biase | BBeeee or, CeKw 20 “TTY INPUT AREA 
3653 . SOCTAL OCTAL TYPEOUT ROUTINE 
(1) : THIS ROUTINE IS USED TO -TYPE AN OCTAL NUMBER ON THE TTY. IT WILL TYPE 
(1) “ALL & C HARRCTERS SUPPRESS LEADING ZEROES TYPE AN 18 BIT ADDRESS, OR TYPE 
ch) ‘THE 16 BITS. tS CALLED VIA THE DUMP, SOUMP, DUMP18, OR BITYPE MACRO’S. 
(1) O14 170101 O14S04 BITYPS: MOV #170101, .PR ;SET BIT FLAG ANS 16. CHARACTER COUNT 
(1) ton che BR At Tt : Bre IT IN BIT FORM 
(1) 014346 112737 000001 O14SO4 PRINTR: MOVB #1 oR SET ZERO FILL SWITCH 
(1) 014354 BR +6 : SKIP 
(1) 014356 005037 014504 PRINTS: CLR “PR :SUPRESS LEADING ZERO’S 
(1) 014362 12737 177772 014505 MOVB is, .PR+1 :SET COUNT 
(1) 014370 O10446 -PTIT: MOV ~(6) : SAVE RY 
(1) 014372 012704 014S06 MOV S PRS. RY :SET POINTER TO FIRST ASCII CHAR 
(1) 14376 14 CLRB (4) : CLEAR FI T BYT 
(1) O144 il BR : *ROTATE FIRST BI 
(1) O14402 105014 -PRL: CLRB (4) “CLEAR BYTE OF CHARACTER 
(1) O14404 032737 O00100 014504 BIT 8100, .PR ‘BIT TYPING MODE 
(1) 014412 001004 BNE : ‘YES - SKIP 2 ROTATES 
(1) 01494149 006105 ROL TTY ‘ROTATE BIT INTO C 
(1) O14416 106114 ROLB = (4) PACK IT 
(1) 014420 006105 ROL TTY ‘ROTATE BIT INTO C 
(1) Ol4422 106114 ROLB ss (4) “PACK IT 
(1) 014424 00610s -PRF: ROL TTY ‘ROTATE BIT INTO C 
(1) O14426 106114 ROLB ss (4) ; PACK 
(1) O14430 105714 TSTB. (4) ;15 IT ZERO? 
(1) 014432 001402 BEQ +6 INC 
(1) O1M434 105237 014504 INCB CPR ‘SET FILL SWITCH 
(1) O14440 105737 014504 TST "PR ; CHECK FILL SWITCH 
(1) O14444 ooisde +6 :SKIP BITSE 
(1) O14 1 000060 BISB #0, (4) + NTO ASCII CHAR 
(1) O144se 014505 INC PRI] INC COUNT 
(1) O14456 001351 BNE PRL *REPEA 
(1) O14460 704 014506 CMP #.PR+2,R4 ‘EMPTY BUFFER? 
(1) O14464 O01 BNE & *SKIP IF NOT 
(1) O14466 112724 000060 MO 8’0,(4)4 : LOAD 0 
(1) O1W72 105014 CLRB 4) "NULL TERMINATOR 
(1) O14474 014506 T .PR+ : TYPE 
(1) 014509 012604 MOV {6)+,R4 ;RESTORE RA 
(13 Ol RTS P : RETURN 
‘t) 814504 900012 LPR: -BLKK ole ‘COUNT, SWITCH, AND OUTPUT BUFFER 
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; BEFORE THe POWER DOWN WAS COMPLETE 
RE 
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Wo. WEeeee F 
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;RETURN FROM TRACE TRAP 
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ZDJBE.P11 08-SEP-77 15:0 SEG 0045S 


aro «SSE JE JE 3 3-2 3 JE 3 J J IE 0 a i a a a a oa a a a a a a a a a 
;10T HANDLER - JTINS TO IO IEAT / F 
PrIiititiiiiiititiiiiitiiittiiiitiitiiitiiiiiiiilttittiiereriecererircg) 


dt Re a Re aa 
4704 


)  $GET VECTOR ADDRESS 


1 
oon04 et i: 

Rat Spence baie 0S TASetZ iE, capeweweciin INERT TO 
1 


14732 050125 O20124 047524 
14740 00040 
3714 14742 pee MOV (SP)+,TTY ; TYPE (SP)+ IN OCTAL 
(1) O14744 014356 JSR PC. PRINTS AND SUPRESS LEADING ZERO’S 
3715 014% 005726 TST (SP)+ : ACK 
3716 O14 000004 014756 +2 : TYPE MESSAGE 
3717 014756 O43040 O47S22 020115 .asctz * FROM™ 
014764 000 
3718 gM EVEN 
i8 01476 O11 (SP). TTY : TYPE (SP) IN OCTAL 
(1) 014770 004737 014356 ISR PC, PRINTS :AND SUPRESS LEADING ZERO’S 
3720 014774 900000 HALT “FATAL ERROR 
3721 014776 O00002 RTI ‘CONTINUE IF DESIRED 
s7e3 : STYPE MESSAGE TYPEOQUT ROUTINE 
(1) s THIS ROUTINE IS USE TO TYPE ASCII MESSAGES ON THE TTY. THE 
(1) ;CALL CAN BE IN ONE OF 3 FORMS: 1) “TYPE ,ADR™ - TYPES THE 
(1) “MESSAGE STARTING IN LOCATION “ADR:", 2) *TYPE .CHAR™ -_ TYPES 
(1) !THE ASCII “CHAR”, AND 3) “PRINT <<15><12>"MESSAGE™> - TYPES 
(1) :THE MESSAGE WHICH IS INLINE ASCII. 
(1) 915009 910546 10TS: MOV TTY, -(6) ;SAVE TTY 
(1) Ol 17605 900002 MOV a2(6), TTY -GET ADDRESS TO BE TYPED 
(1) 015006 032705 177400 BIT #177400, TTY :1S IT A TYPEM? 
(1) 15012 1004 BNE 1§ :NO 
(1) 015014 010537 015104 MOV TTY, . TYPE GET THE CHARAC 
(1) 015020 012705 015104 MOV 8. TYPE, TTY “FUDGE THE ADDRESS 
(1) 015064 1057 5 1S: TSTB Ss TTY) : TERMINATOR? 
(1) 15066 BEQ *GET OUT IF SO | 
(1) 1 il 177566 MOVB  (TTY)+,98177S66 :LOAD AND TYPE THE CHARACTER 
(1) b15034 105737 177564 TSTB = #177564 :1S THE PRINTER READY 
() Ol {bases BPL 4 WAIT UNTIL IT IS 
(1) O1SOMe2 BR 1$ ‘GET THE NEXT CHARACTER 
(1) O15044 017646 oo0002 28 MOV 32(6), -(6) ‘GET ADDRESS TO BE TYPED 
(1) 0150s0 000002 o00004 ADD 8e. 4b : ADO e TO THE ADDRESS 
(1) 015056 Oeebbb po00d2 CMP (65+, 2(6) -1$ IT .42? 
(1) 015062 001006 BNE 3$ : NO 
(1) 015064 99002 ADD 82, TTY :ADD 2 TO THE ADDRESS 
1) 915070 000! BIC a1 TTY :BACK UP TO AN EVEN BYTE 
(4) OL 1 000002 MOV TTY, 2(6) ;RESTORE ADDRESS 
‘1) O18190 Oleeos 3S: MOv (6)4, TTY ‘RESTORE TTY 
‘l, O18192e odode RTI : RETURN 
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TYPE ROUTINE 
. TYPE: 
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LQ2VQV_LG_GODP LL OD OD ON DOOD BROADEN LAD OVWAPO GAO OA QVAXW’_RW’_iR OOO ARO HS 
-*@ Oo OIG 8 0 wh 4 4 0 0 0d 8 4 wo Ow Oe coe hae kee het Oe oe a re re rere re rey) ee oe ee ee ee ee re rere) 
* 


MAINDEC-11-DZDJB-E-D 


DZDJBE.P11 


TYPE SWREG IN OCTAL 
; TYPE LEADING ZERO’S 


: a . 

iT a = 

| ten ~ a 

a ce =z 2 Se a k= = wo 
> o Sun2 & u % an ~ rwo ° —~ ~ & 
gare: 3; SA ae Eee 88 
Bata ORE 2 LiTentdathy debR Scns, 2." 
~ 3 nanny 

w br ca} > w S w Raw 
pvtantntyecee 2 2 ssspgsesssce spsSSEver ges 
: ore 

az d an a at 23 


015166 
036527 NEWIS: 


754 
210 
ele 
000176 001210 KBDINT: CMP 
015336 
015336 
015336 
047505 000120 MEOP: 


veers wees 
O46040 
0075 


Sene 
96006 r=) 


coeeebcoios & 


15106 


ae 
yr ie 
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020040 042516 

Boesrs 05323 036522 SUREO: 
177977 163 
000176 
g00174 
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OZDJBE.P11 08-SEP-77 15:07 TYPE ROUTINE 


3731 


SEG 0047 
§371 015 177412 177777 RETURN: .ASCIZ ¢15><12)<377><377) 377) 


SPACE: .ASCIZ “ * 
MSGMON: .ASCIZ <15><12><377>"MAINDEC-11-DZDJB-E OJ11 EXERCISER” 


1 
1 


ee 
8 


3732 O40 O00040 
7 ae 


al 


z 


045104 


Baise Os 
ee re 


1 


MSGADR: .ASCIZ <15)<1l2>"FIRST DJ11 ADDRESS: ™ 


basERIEOR 


—e— po 
uN ~— 


3734 


8 
R 
a 


” 

n 

ge 
Be 
~ Se 


R 
aS fee 


SOS MSGVEC: .ASCIZ <15><12>"VECTOR ADDRESS: ™ 


as 
Re R 
Ke 
a 


_ 
~~ 
4 

—- MoO 

N We 


r 


MSGNUM: .ASCIZ <15><12>"NO. OF DJ11’S: ™ 


ooo 
ot he os Bh De a Pm + oH Ha D-| 
é 
a 
bo 
tw 


eee 
ee 


z 
Z 

RR ARE RE 
ie 


MSGPRG: .ASCIZ <15)><12>"PROGRAM 8: ™ 


BG 
ns 
e 
R 
~~ 
N 


«15><12>"NO DJ11°S!™ 


2g 
5 
PE 
—rO 
8 
i 
3 


BRS 


= 
e 


(15><12>"PROG2: CONTINUOUS ECHO EXERCISER™<15>< 12> 
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~ 
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REE 
ae 
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a5 


MSGP3: .ASCIZ <15><12>"#ECHO TEST#"<«15>« 12> 
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% 
an 
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Z <15><12>"SILO ALARM LEVEL FOR CSR"<15>< 12> 


eorere 
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R 
ae 
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e 
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ww 
N 
4 
an 
© 
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~ 
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ae 
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MAINDEC-11 
OZDJBE.P11 
— 010206 
thick  bovaoe 
ALMFLG 1300 
ng 
= 

BINARY 0102S2 
BITYPS 014336 
Bre = 1 

ITl ¢e 
Bi Tto = 

sti} = 
BITle = 010000 
BITI3 = 
BITI4 = 
BIT1S = 100000 
BITe = QOO004 
BIT3 = 000010 
BITY = 
BITS = 
BITE = 100 
BIT7 = 000200 
BITB = OOO400 
BITS = io 
ere poises 
CNT 015166 
CNTLU 015106 
CNTNIT 010210 
CNTTAB= 004313 
COUNT 001306 
DEVADR 001270 
DISPLA OOlele 
DISPRE 000174 
DIMAP O0S4Se2 
DO 013S2e2 
EMTS 013610 
END 015734 
ERRORS 001202 
Fiego Bers 
F 11 
FORPS  O12460 
GETLEN 005754 
GETVEC O0S534 
HLT = 104000 
HL TADR eed 
MLTCTS 013736 


CO 
S- 


Xb 40 40-00-4040 
Pht | a 


Ary 
ne 


e+e -0--0e -b += 


© 
Ww 
2S 
© 


geeeeees 
Bae 


~O0ZDJB-E-0 


DJ11 EXERCISER 

15:07 

29S4 ess 

e642 e848 

eHe 30098 

26478 cone 
» 558 

3171 31878 

363938 

e6208 3026 

eb208 

26.708 

cbc 08 

ebe0s 

26208 2765 

eb208 

ecbe08 

eb2e08 3010 

eb2e08 3027 
. 2791 

eb2oes 

26208 

25208 2847 

ebele 2961 

eCb418 8 sic7e 

eb408e 3428 

S664#  3682% 

37248 

2691%  269e% 

ecb668 3328 

e6508 2998 

26438 2703 

26338  3725% 

eb2eS@ 3725 

27038 

2719 3008 

2679 36418 

3177 3179 

26318  eb8l# 

3375 Bega 

S3oss | Seed 

34938 

2766 r} 

2716 2728s 

cbe0s 

3641 8s 

Sb4lee 3644s 
r} 

36958 

36539# 3661# 

ze snes 

$i 37238 

3049 38 

ctels 


31718 

ebb4s 

3025 

2340 2971# 
3641 

3046 

2938 2964 
3e8* 3547 
3466 

37248 

3726 

2693% 2956 
3332 3399% 
oniae = 3019% 
2730 

36388 

3181 3183 
3641# 

3136 3153 
3928 

3641 37268 


AND ON-LINE TESTS 
CROSS REFERENCE TABLE -- USER SYMBOL 


2957 


3028 
2788 


3185 


3367 


JO4 


MACY11 wee 


303S# 
3030 
2807 


3427 


3382 


3036# 


3034 
2918 


3429 


3580 
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3041# 


3037 
3243 


3549 


3594 


3043# 
3040 
3438 


3621 


3599 


3044*# 3O4S# 
3056 3066 
3501 

3623 37448 
3605 


31728 


SEG 004e 


MAINDEC-11-DZDJB-E-D 
OZDJBE.P1l 08-SEP-77 15: 


a 


oe 
ie 
MNUM 
MSGADR 


= 
ere 
: 


Ftatst 
Ss 
BAB 


= 
a 


aR 
: 
g 


DBDDD 
rater 
alates 
RR 
a 
yes 


bbisee 


is 


015451 


eg oct 


RoR 


14146 


Rue es 


Oo00000 


SSB a8e 


Re 


2° 
ite 


DJ 


11 EXERCISER 
:07 
ee, ie 
r] » 
grat 3462 
: ge66 
3636 37288 
28S2 37298 
2769 were 
ye ae 
2843 37378 
3270 37398 
7 8 
S # 
e771 37358 
2717 37388 
eS638 31898 
37248 
ebees 2638 
eb32e8 cb8e# 
2677 36958 
3173 32078 
2770 3054 
e77e 2774 
soe 28798 
2871 
2880 28978 
2881 32228 
2882 34148 
ebec0s 2899% 
368S* 3687 
369S8 
3695 8# 
29178 
32428 
3308 33618 
3308 33178 
34378 
3528 74% 
3528 37% 
cb638 7% 
3086 31308 
2cb4Ss 
53s 3 
16% 19 
2844 
3660 36928 
e754 27658 
e627 2862 
2768 2851 
2320 3086 
30868 
30868 
20868 


29S2 
3477% 
2808 


AND ON-LINE TESTS 
CROSS REFERENCE TABLE -- USER SYMBOLS 


2959 
3149 


32018 


3638* 


3641 
36938 


3224# 


KO4 


MACY11 30(1046) O8-SEP-77 15:13 PAGE Se-1 
SEG 0049 

3266% 3268 3273% 3341# 3343 3346 3390# 3392# 339 
3380 3892 
32058 
3648 36938 3724 
3714 3719 
3279 416% 3484* 3685 3687# 
3334 3337 3385 3387# 3398% 3465# 3597 3603 36178 
3624 36eS# 3626+ 
3695 
37318 


SEG CO0So 


O8-SEP-77 15:13 PAGE Se-2 


LOY 
MACYL1. 30( 1046) 


CROSS REFERENCE TABLE -- USER SYMBOLS 


OJ11 EXERCISER AND ON-LINE TESTS 


MAINDEC-11-DZDJB-E-D 
08-SEP-77 15:07 


OZDJBE.P11 


3035 
3457 


2856 
2874 
3031 3034# 
2944 3264 


33088 

35288 

2857 

2846 2872 
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Pil 08-SEP-77 15:07 CROSS REFERENCE TABLE -- USER SYMBOLS 


OZDJBE. 
13 1 t 
Svea DoLSee : 
SvSH1S 001252 26388 
avails 001254 26388 
1 8 
1 8 
1 & 
1 8 
153 Ba 
te 
a ne 
ae. «10 ] S 2784 2847 2947 2% 1 3050 3638 3641 3724% 3725% 3724 
G 1 é 784 3724 3725 3726 
SWRE Q 15200 37248 
SW10 = 002000 2s718 3638 3641 
SW11 = OO4000 25718 
is =0Q le 3050 
13 = le 3641 
149 = 718 
SW1S = 100000 25718 
SWB = 000400 25718 
SWS = 001000 25718 3641 
TIME 007320 3022 30628 
TIMERA 001302 eb48e 3014" 30628 
TIMERS 001304 26498 3015%  3064% 
TIMES OOleléb 8 94# 3004% j#3007% 
TMP 1 015336 ae 
TYPE = OO00004 8 17 ee? 768 4. 2771 2773 2843 2851 2852 28ss 30S2 
4] 49 Se 93 3695 3712 3716 3724 
UNIT 001 4o8 1S5* 2746 2774 2787 2806 2860 2864 2969 3277 3482 3500 
My 001 Sot g * 2772 2319 3244 3439 
XISRO ty 8 
XISR1 O07404 30868 
XISR10 007564 30868 
XISR11 007604 30868 
XISRl2 007624 30868 
XISR1iS eg 30868 
XTSRIG 007724 30868 
XISR1 hex 30868 
XISRe 24 30868 
XISR3 O07444 30868 
XISR4 007464 30868 
XISRS 007504 30868 
CNT 2 $ 2663 e956* 2989 3102 310S* 3271% 3324 3327# 3336 3349 3401s 
TLL 001 # 3938 3253 3448 
XATTES rete spas 2900 eos4*# 3104 3106% 3109% 3225 3270% 3326 3330# 3334% 3335+ 
*# 3417 S464# 3493 3544 3545#  3546% 3547 3549% 3550 3553* 3615 
X2SRO 011230 3088 
X2Sk1 011250 33088 
M2SFIC 011430 33088 


SEG 00S1 


3348+ 
3624# 
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OZDJBE.P11 08-SEP-77 15:07 CROSS REFERENCE TABLE -- USER SYMBOLS SEO 00Se2 
1 ll ] 
aa Hi 
X2SR1 11510 33088 
X2SR14 011530 33088 
X2SR1S 011550 33088 
Kel 011570 33088 
li 8 
ll 8 
1131 ¥ 
xeon 11330 33088 
011350 33088 
XeSR6 011370 33088 
X2SR7 011410 33088 
X3SRO 012560 35288 
X3SR1 1 & 
10 Ol é 
1 1 8 
1 1 % 
X3SR1 13040 35288 
X3SR14 013060 35288 
X3SR1S 013100 35288 
X3SR16 013120 35288 
eel Bight * 
ea r} 
Sae®: : 
eee] 12720 35288 
12740 35288 
YESRT 14670 36988 
an: 
18736 g 26578 ee ebbe8 2665¢ 32098 3638 36418 36928 36938 3695 


388 
sree 26298 
3712 4 §=63716 37188 3723 
estes 2571 3638 3641 


Jes) 

| on] 
. : 
Ooo0000O- BOOOO0O0O 


; 32000 a 

-PR 14504 36938 

- PRF 14424 3693 

-PRL 14402 36938 

-PTIT 14370 36938 

-SAVRS 014662 3695S 8# 

. TYPE 15104 3692#  37238% 


pai tai ht  aemnsnan Rog tb 3 rests TABLE Paty mre ) O8-SEP-77 15:13 PAGE S3 ero 0053 


199 3205 
ITYPE 8 
a 
18 bie 26208 2770 3641 3724 
I 11818 
iiss 
Til ieave 
Tllx 31 8 7 
POP 8 8 120 3161 2s 3403 3479 3564 3636 3686 3695 
PRINT i r] 4 36 35 
ap 4e 8 31 331 3361 3461 3S37 3574 3662 3695 
ae 
: ® 2208 2772 2774 3714 3719 
TRACE ieoee 
1 8 
38 
WRI 12108 
SCATCH 8 
SCNTAG a 
SCNTL 24758 3724 
2 ae 3638 
Say 7aee Seat 
sipenT Senay bes 
ie ® 372 
T 8 
eo 78 
T 8s 3693 
8718 3695 
10748 
REAL 1ie38 eae 
Cr Og ze 
SE TUF lls 
boRAT the 7 
oe ket BH 
ee | “Orbe 
T $158 3723 
Seat 28 
. SCOP “8 
SCOPE Ss 


- ES. 01573 900 


ERRORS DETECTED: 0 
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COS 
ESOBE PLL Oe SeP=77 TEhrOERTSER ROSE REP ERENCE TABLE -—"HACAG RAMS NOS PARE SO seo 00s 


RUN-TIME RATIO: 228/14216.0 
San eS et es 
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